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PRELIMINARY INFORMATION ON MICROSOFT 8K BASIC FOR KIM-1 


Variable names wust start with an alphabetic character,eg. A, Al, A(3,7,2), ZULU 

String (literal) variable. names are followed by a dollar sign,eg. A$, ZULU$, A$(2,3) 

Although variable names may consist of more than two characters, only the first two 
characters uniquely identify the varable,eg. COST is the same as CORE 





OPERATORS: -, +, *, /, *, MOT, AND, OR, >, <, <>, <=, 7 > 








STATEMENTS FUNCTIONS STRING FUNCTIONS COMMANDS 
TLEAR RSOD KSC(xS) CRT 

DATA ATN(X) HRS (1) LIST 

DEF COS(x) FRE (X$) NEW 

DIM EXP(X) LEFT$(X$) NULL 

EXD FRE(X) LEN(XS) RUN 

FOR INT(X) MIDS (X$, 1,5) 

coro LOG(x) RIGITS(X$,1) 

GosuB PEEK (X) STRS(X) 

IF...G@TO POS(1) VAL(X$) 

IF... THEN RND(X) 

IwPuT SQN(X) 

LET SIN(X) @ Erase typed line 

NEXT + | SPC(I) SHIFT/O or + Erase last character 

ON...GOTO SQR(X) : Seperates statements on same line 

ON... GOSUB TAB(I) CONTROL/C Interrupts execution or listing 

POKE TAN (X) CONTROL/O Inhibits output to terminal 

PRINT or ? uSR(1) 

READ 

REM Both versions of BASIC use page zero and page one. They start at 2000HEX. 
RESTORE Although they are meant to be used with serial terminals, 1/0 pointer 
RETURN locations are provided. The USER, PEEK, POKE, and WAIT statements are 
STOP used to link BASIC to machine code programs and the KIM-1 ports. The 


6 digit version uses two-letter symbols for error messages. The nine 
digit version spells out complete error messages. When executions or 
listings are interrupted by mcans of the CONTROL/C or an error, BASIC 
indicates the number of the line it was about to execute or list. 


| sso2__| 


[car vy y PRICE] 
PAYMENT WITH ORDER. ADD $4.00 FOR SIITPPING AND HANDLING. OHIO RESIDENTS ADD 4.S% 


9 DIGITS 10E-32 to 10E+32 
SALES TAX ( $4.39 for KB-6 and $5.81 for KB-9 ) 













RMS: 


Microsoft 8K BASIC for the KIM-1 is furnished on cassette with complete documentation, 
including « 239 page Schaum's Outline Series' Theory and Problems of Programming with 
BASIC by Byron S. Gottfried, Ph.D., McGraw ww — 


P.O. BOX 523 MEDINA, OHIO 44256 
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KIM-1/6502 USER NOTES 





We're beginning to feel Like nomads here at the USER NOTES! As you can 
see from the new rxetuan address we've moved again. I'd like to thank you 
for your patience. I've decided to make this a double issue to help make up 
fox the delay. Hope you notice our new mailing labels. KIN is now doing a 
Little work for the newsletter (it's only fitting, rightt}. See the "SOFT- 
WARE REVIEW" gor mor info on this godsend of a software package. 


ATTENTION NEW SUBSCRIBERSIIIIIHIT 


Unfortunately, we are completely sold out of back issues to the news- 
letter. If you signed up for issues 1 thau 6 you are automatically being 
set up for issues 7 thau 12 instead, Plans for reprinting have not been 
finalized, As 400m as things are nailed down as far as price and availability 
are concerned, that info will be passed along in the NOTES. 


Pevecereversuccessseeeee 


57109 CALCULATOR CHIP AVAILABILITY 


In the last issue of USER NOTES, the new RPN calc, chip (rom NATIONAL 
was mentioned as a idea fon a KIM interface. It is advertised as being 
available from TRI-TEK INC., 6522 N 43nd Ave., Glendale, Az 85301. 


The price quoted is $21.92 for the chip and data sheets or $2.00 for 
the data sheets alone. 


FROM THE FACTORY AVAILABILITY OF MEMORY & MOTHERBOARDS 


As you know, the KIM-2 and 3 (4K and 8K RAM cards) have been discon- 
tinued, The KIM-4 Motherboard ia back on the production list and should 
be available in December. The KIM-3A, Long awaited 8K replacement board, 
will be delayed indeginately. 


‘ v 
\ Hodever, don't despairli! It is possible to adapt boards of the S-100 
genrd fo Yhe KIM\4 mothetboard. In fact, an application note describing one 
pantakulaX\%s avatlabte from HOS TACHNOLUGY. This app. note déscribess 


However, don't despainii! It is possible to adapt boards of the S-100 
genre to the KIM-4 motherboard. In fact, an application note describing one 
auch adaptation i4 available from MOS TECHNOLOGY. This app. note describes 
the mechanical and clectrical interface necessary to add a KENT-MOORE ALPHA- 
VIDEO on their 4K RAM board to the motherbvoard. These two particular S-100 
boards are fully assembled and tested and worked well, 


Other S-100 boards could also be adapted, but due to the wide variance 
of signal requirements necessary for the seemingly “standard” bus structure, 
all other adaptations are left up to the cleverness of the user. 

Seveeeveceeeceneeeeees 


SOFTWARE REVIEW by the editor 





ececscccccee -Get "HELP™ from the COMPUTERIST.. 


HELP 44 a series of application programs which include a mailing List 
handler, a text editor and printing package, and an ingormation retrieval 
program, which run on the naked KIM. I used the mailing list package. ALL 
I added was another cassette, a couple of TTL-controlled relays, and, of 
course, a hard-copy terminal (which is necded for all three packages). 
come to think of it, you could probably get away with using one of 
cost impact printers out on the market, 


But, 
the low 


Anyway, the software is really exccltent., "HELP" is actually an inter- 
preter-style parameter-passing Language which is very well documented and 
worth every penny of the $15.00 pace just to sec how dt works! It would 
seem fairly straightforward to adapt this style of mind-interpreter to 
about any kind of application, such as; data collection, text editing, word 
processing, game playing, disc-file management, etc. 


ALL sorts of neat things can be done with a Little imagination! ! 


"HELP™ REALLY IS IMPRESSIVEIIIIII11Seeing KIM doing some useful work 
bor the newsletter (4 a thrill that just can't be descrrbediit 


T highly recommend that you get more info on the "HELP” mailing List 
package as well as the rest of the "HELP" packages. Each are $15.08. 

For the Latest information, waite: The COMPUTERIST, PO Box 3 
S. Chelmsford, Wa 08124 


Ask for their complete catalog and a copy of their simpligied 
6502 op-code table. 


P.S. 





$502 va. 280 


Want to know which chip comes out on top? Then get a copy of KILOBAUD #10, 
Turn to page 20 and read the article. . 


780 Freak t hearts out Il 
. ee 








GOUD GUYS REALLY COME THROUGH IIT 


In issue #6, I asked for volunteers who would be willing to help out 
other members of the group by answering questions etc. through the mail. Here 
ane the first of the “gcod guys" DON'T FORGET TO SEND A SELF -ADDRESSED- 
STAMPED-ENVELOPE with your correspondence 40 our friends don't go broke. 


Bauce Davidson, Box 1738, Bismark, ND 58501 


Mike Jerabek, c/o University of New Hampshire, Physics Dept., Demeritt Hall, 
Durham, N.H. 03824 (SOFTWARE) 


Stan Bowling, 828 N. 31St., Colorado Springs, Colo. $0904 (HARDWARE & SOFTWARE) 


SSS 





Alan Jorgensen, 14007 N. 35th Daive, Phoenix, Arizona 85023 


John Fallisgaard, Apt. #604, 1101 S, W, Phwy., College Station, Tx. 77840 
KIM-1 USER NOTES axe published bi-monthly by Eric C, Rehnke, 109 Centre Avenue, (HARDWARE (SOFTWARE! 
W. Norriton, Pa. 19401. Subscription rates are $5.00 for six issues (U.S. 6 
Canada}..$10.00 for six issues elsewhere. No part of the USER NOTES may be copied 
Gor commerctal purpose without the expressed written permission of the publisher. 
Antichea herein may be reprinted by hobby or club newsletters as Long as proper 
credit da gdven and the publdaher da provided with @ copy of the publication. 


Thomas Baay, Apt. #5, 1945 N. Oakland Ave, Milwaukee, Wise. 53202 


14 your Looking for a bit of fame {not much fortune} then add your name 
10 Our growing List cf "GOOD Guys", 
Eade..... 
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Thilip A. Wasson 
9513 liindry Pl, 
Los Angeles, CA 9004S 


TRACE 


With this program and about $2.0U worth of hardware 
you can see displayed on an oscilloscope screen, all the 
registers in the 6502 and three consecutive memory location 
starting at the address contained in the registers. 

They are displayed in the following format: 


PC XXXX XX XX XX 
SP O1XX XK XX XX 

XXXX XX XX XX 
NV bdIZC X Y A 
AAAXXAKANK XX AK 


The first line shows the label PC, indicating the program 
counter, followed by the the address contained in the PC, 
followed by the contents of three consecutive address, 
starting at the value of the PC. 

The second line shows the stack pointer in the same format. 
The third line shows a user definable address and displays 
it in the same format as above, 

The fourth line shows labels for the bits of the P register 
and for the X, Y, and A registers, 

The last line shows the contents of the registers, 


The program consists of a software driven graphics 
generator, a display formatter, and a monitor, It resides 
in $0200-$03FF, 


MEMORY ALLOCATION: 


O3ER-O3FE SECMENT FORMAT TABLE 
O3FO-O3EA CHARACTER FORMAT TABLE 
O3B1-O3DF LINE FORMAT ROUTINE 
O3A9-O3B0 PATCH AREA 

0350-03A8 DISPLAY ROUTINES 
0303-035F DSPRFG 

0270-0302 MONITOR 

0228-026F HFANING TARLE 
O21B-022A EXIT ROUTINE 

020N-021A PATCH AREA 

0200-020C INITIALIZATION OF NMI VECTOR 


Here are the locations of several useful subroutines: 


0303 DSPREG - Displays all registers. 

0360 OUTBYT - Displays a byte in A, 

O36B OUTCIIR - Displays a symbol if bit 7 of the accumulator 
is off, Symbols displayed are: 0,1,2,5,4,2,6,7,5,9,0, 
A,b,C,d,E,F,0,1,P,6 in order of the numeric value of 
the five low order hits of the accumulator, 

If bit 7 is on, a vector is drawn in one of fifteen 
direction, depending on the value of the low order 
bits. Bit 0 is used for beam blanking. Bits 1 and 2 
slong with bits 3 and 4 indicate the new relative 

c 


vertical and horizontal position, respectively. 
Bits 5 and 6 are vertical and horizontal reset, r 5 
respectively, 

0374 OTSEGS - Displays s symbol in the following 8 segment :| bla 
display format, with the bits in the accumulator . 


indicating the corresponding segments to be displayed. 3 


038B NFWLN - Returns beam to left margin and down one Lin , 
OS8F NEWPG - Returns beam to top left margin, 


$1701 MUST BE SET TO $FF BEFORE CALLING TIIESE ROUTINES! 


CONSTRUCTION AND USE 

Construction layout of the oscilloscope driver 
circuitry is not critical, but leads should be kept as short 
as possible. It is important that the power supply be well 
regulated for a stable display. A 309 or 7805 type regulator 
is adequate. 

Some uscrs may want to use a CMOS 4555 instead of the 
TTL logic. 

If your oscilloscope does not have a Z axis input, 
the following circuit is suggested. This circuit deflects 
the beam off the screen during the blanking period, 


vour - 


HouT 





PAO —— 


To use the program, connect A-15 to F-6 on the KIM 
connectors and begin execution at $U20U, This sets the NMI 
vector to $0270, Now, when you press the ST key, you will 
be in the TRACE monitor. This monitor is just like the 
KIM except it is always in single step mode (even though 
the SST switch is off!) and when AD is pressed, it is put 
in address mode and the address is decremented by one. 

To return to the KIM, press RS, 

Set $EM and $EF to the address you want to monitor. 
This address and it's contents will then be displayed 
continuously on the third line of the display. 

Set your oscilloscope to x-y input mode and the 
horizontal and vertical attenuators to ahout .2V/cm NC, 
Connect the x, Y, and Z inputs to the driver circuit, 
Adiust the hean intensity for ontimum character definition, 

You will notice that the KI“ display is dimmer than 
usual and there is some flicker of the displays, 
about 16 frames per second, Also the display on the scope 
may be slanted, To correct this, adjust the 50K trim pots 
for horizontal lines and vertical marcins. 

If the scone display appears to be written in 
hieroglyphics, the heam blanking may need to he inverted. 
To do this, set $039€ to $01, 


MODIFICATIONS 
The trick to single step operation without using the 
SST switch is in the interupt exit routine. This routine 
sets the timer to give an NMI one cloch cycle after the 
RTI is completed. This is part way into the next instruction 
to be executed. Since all instructions take at least 2 cycles, 
and the interupt is inhibited until the instruction is complete, 
only one instruction is executed before the NMI occurs. 
Thus a single step function is performed. 


21B AD 03 17 INTEX LDA PBDD 


21f 29 7F AND #$7F 

220 8D 03 17 STA PBDD 

223 A9 28 LDA =$28 

225 8D OC 17 STA CLKITI more... 
228 4c c8 in JMP GOEXEC 


Trace Contd) 
In beburine large programs with manv loops it is 

desirable to use conditional tracing, To do this, the 

user must write a routine to test the desired conditions 

to be traced, Locations ¢0287 and $0288 are set to the 
address of the test routine (low order byte first, 

of course). If the condition is met, the test routine exits 
with a .1P $1F88 (INITS). Otherwise, exit with: 


PLA 
PLA 
JMP $0218 


EXAMPLE: Trace if X is less than 2 OR A=0. 
TEST LDA $F3 


CNP #2 
BCC TRUE SINGLE STEP IF X IS LESS THAN 2 


GET VALUE OF X 


LDA $F3 9 GET VALUE OF ACCUMULATOR 
CMP #0 
BEQ TRUE SST IF A=0 
FALSE PLA 
PLA 


JMP $U21B EXECUTE NEXT INSTRUCTION 
TRUE JMP $1E88 RETURN TO TRACE MONITOR 


IF YOU ARE USING CONDITIONAL TRACING, IT IS NECESSARY TO 
ENTER THE TRACE MONITOR AT $0289, INSTEAD OF BY THF ST KFY! 


EXAMPLE: Press RS, AD, 0, 2, 8, 9, GO 

Now set address where tracing is to begin and press GO, 
To return to normal tracing, set $0287 to $88 and 

$0288 to SIF. 


The following routine executes a program in "slow motion", 
about one instruction per second, and displays all the 
registers on the oscilloscope screen. 


200 AZ 11 SLOMO LUX «$11 ;SPEED CONSTANT 

202 8E OF O2 LP STX SAVX+l 

205 20 03 03 JSR DSPREG 

208 20 6A 1F JSR GETKEY 

2UB AA TAX 3SET FLAGS IN P REG 
20C FU OA BEQ TOMON 

20E A2 00 SAVX LDX =*-# 

210 CA DEX 

211 DO EF BNE LP 

213 68 PLA 

214 06 PLA 

218 4C 1B 02 IMP $021B ;TO EXECUTE ONE INSTRUCTION 


218.4C 88 1E TOMON JMP $1F88 ;RETURN TO TRACE MONITOR 


To start SLOMO, set $0267 to $U0 and $0288 to $02 
with KIM , Enter TRACE monitor by starting execution at 
$0289, Then set address where tracing is to begin and 
press GO, 

To return to TRACF monitor, press 0 key. 

To resume SLOMO, press GO, 
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ADDR 
0200 
a210 

220 
0230 
o240 
0250 
0260 
0270 
u280 
0290 
UcAU 
v2B0 
v2co 
o2n0 
0260 
o2Fu 
05v0 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
O3A0 
0380 
03co 
03D0 
03E0 
O3FO 


HEX DUMP 


1 
70 
00 


2 
8D 
00 
17 
13 
86 
91 
80 
68 
FS 
DO 
oA 
FO 


3 
FA 
00 
AQ 
13 
88 
86 
88 
as 
BA 
FS 
1F 
34 
04 
26 
FA 
89 
20 
8s 
AS 
20 
Ag 
F2 
4A 
03 
97 
A2 
8E 
Bn 
F6 
20 
9E 
FE 


4 
17 
on 
23 
86 
13 
99 
13 
FL 
bo 
zu 
co 
cg 
Ag 
TA 
AY 
OZ 
8F 
F7 
Fn 
OB 


oF “TRACE” 


6 
02 
00 
oc 
85 
oD 
8D 
84 
Bo 
20 


305 


10 
Fo 
DO 
FB 
no 
1B 
AY 
Rl 
Fo 


9 
17 
00 
cs 
85 


A 
4c 
00 
1p 
85 
88 
oc 
8D 
60 
8c 
Fu 
Fu 
FO 
06 
Fu 
8> 
83 
17 
BS 


00 
17 
13 
B4 
83 
BF 
13 
Bo 
05 
19 
10 
OA 
gh 
FA 
by 
FO 
AS 
ol 
0s 
AS 
88 
DO 
8E 
04 
no 
8n 
00 
AS 
13 
A2 
6E 
E6 





Hf p A. Wasson ( 
9 dindry Pl, 
Los Angeles, CA 90045 


TWO "NEW" INSTRUCTIONS FOR THE 6502 


Have you ever wondered if those undefined on codes 
for the 6502 do anything? Well, there are at least two 
"new" instruction that I have discovered. First let me 
warn you that they are undocumented and are subiect to 
chanpe by the manufacturer. Also they are a little strange. 

The first is op code 7f which I have given the 
nmemonic PXE which stands for "Decrement if index register 
X Equals zero", The only address mode is absolute, 

The use of the DXE only seems to effect the N flag, 
which appcars te be undefined but depends on the value 
of xX. 

The second op code is 9E, I have given it the mnemonic 
SXNE, which stands for "Set effective address to one if 
index register X does not equal zero, otherwise set to zero”. 
The only addressing mode is absolute indexed by Y. It does 
not appear to set any flags. 

There also appear to be some redundant op codes, 
such as, 66*C6, 6A=0A, etc. My search has by no means been 
exaustive so there may still be some more undiscovered 
instructions. 

The date code on my 6202 is 0676 so it doesn't have 
the ROR instruction, If the 6502 is microprogrammed later 
versions may respond differently to these op codes. 

=== == 











Some comments t corrections fem- nike Firth, 104 M. St. Mary, Dallas, Tx 75214 


Before going to the main point of my letter, I want to say that I have 
my programming for ay Polymorphics Video Board running nicely. It has the 
built in ability (by changing a flag) to work with 32 or 64 character 

-llnes, allowing for the wiring scheme of the Poly board (ie. ignore address 
line § for 32 characters). The programming includes all of the screenread 
functions, home, line feed, carriage return, blank screen, backspace, forward 
curser (without changing characters) up and down curser. For my own purposes 
1 will be working on an editor (or adapting HELP which I have bought but not 
yet received) to permit character editing and writing of the screen to tape 
and loading from tape to the acreen. 





I am about to buy the 6k base 2 (advertised in OM LIME) S-100 board, which 
ie $125 for the slower speed I can use and is by far the cheapest I have seen. 
Will let you know, 


It may be s bit lste, but I do have to point out @ couple of things about 
the notes on running s triac from KIM io issues 3 and 4. The original (@3,p.8) 
works wuch better if the load is attached to MT2 and the plug or power supply 
ida to MT1 (in other words, exchange the labele at the right of the bottom 
diagram op page 8.) 

I am scmewhat surprised the circuit shown in the diagram in KUN4 (p.6) works 

_ at all, for several reasons. Firet, I believe the resistance connection from 
the photocell (shown as 10K) should go to MT2 and not beyond the load. 

‘The flicker that is mentioned can cowe from either of two sources, both 
of which should make the circuit work poorly. The Radio Shack CdS cells that 
I purchased (and have used for other projects) have a very slow decay tine, 
on the order of a second. Secondly, making an incandescent lamp respond in 
something like @ single cycle (120 per second) ie very unlikely, Therefore, 
the pulses are modulating the lamp just above and below the trigger brightness 
needed for the triac. Well, sometimes, due to slight ehifts in the character- 
ietics of the lamp and the cell and the triac the trigger signal will either 
come late in the cycle or just miss for several cycles causing flicker. (Example, 
lamp heats photo resister, changing resistance, lamp is pulsed less often, unit 
is cooler, slowly the resistance changes, besides the light effect.) I think 
examination of the Triac wave forms will show a very sloppy output that may 
harm sowe motors. Take care. 











MORE ON THE TRIAC FROM: G. THOMPSONe 39 JUDSON ST. ROCHESTER» Ney 1 
"HERE IS A REVISION ON CASS LEWART’S TRIAC INTERFACE (#39 P. 8) 
Rerxcnren 

THAT IMPROVES SHUT OFF. 


IWAS RUNNING A 25W. BULB AND NOTICED THAT SHUT-OFF WAS NOT INM- 
EDIATE-THE BULR WOULT) GLOW AT HALF BRILLIANCE FOR A SECOND OR SO- 
THEN EXTINGUISH. A SCOFE SHOWED THAT THE TRIAC WAS ACTING LIKE AN SCR 
DURING THIS DIMMED FERIOD+ THAT IS+ HALF-WAVE INSTEAD OF FULL. THE 
SMALL RESISTOR (R) WAS ADDED AFTER STUDYING RADIO SHACKS CIRCUITS 
FOR DIACS AND TRIACS. IT WORKS ONA 25. BULB? AN AQUARIUM PUMP + 
AND A 1/20 HP WATER FUMPI 








TO LIGHT OR 
APPLIANCE 


6202 


TO 10 v. 
wat 


OuTLET 





oR < SOn. depending on load 
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Charles C. Ohsiek 
Box 853 


Patchogue, NY 11772 


This code allows writing an ID on the audio cassette tape prefixing 
the data SUPERTAPE writes out. This ID can then be shown by 
VU-TAPE, or ignored by the KIM-1 tape monitor. 

The ID consists of one byte, or two hex characters, at address 17F9; 
these two hex characters MUST BE !UVENTICAL; 1.e., 11, TT, AA, ete. 
NOT 01, 07, etc., otherwise it cannot be viewed properly on 
LED's. This allows fourteen different ID's before duplicating. 


Relocatable 


(O1BF C3 03 7E END OF SUPERTAI‘F) 








01C2 AO BF START LbY SP Set directional 
O1Ch BC 43°17 STY Prop -reristers 

01C7 A2 o8 Lbx #28 Send 8 

01C9 AD 16 LDA #416 +syne 

O1cCB 20 61 01 JSR WIC ».characters 

O1CE AQ 2A LDA WOR Send 

01bD0 20 938 01 JSR OUTCHT sasterisk 

O1D3 AD F9 17 LDA Ip Setup to send 
01D6 A2 64 Lbx ¥$o4 +100 

01D8 86 EO STX Tic ID characters 
O1DA 48 LP PIA ave character 
01DB 20 70 01 JSR OUTBT «send it 

O1DE 68 PLA «eeeebdring it back 
O1DF C6 EO DEC TIC Decrement counter 
O1El DO F7 BNE LP Do it again 

01E3 4C 00 O1 JMP DUMPT Now--start SUPERTAPE 











0100 


0101 
0102 
0103 
o10al 
010: 
o1oe, 
0107; 
0109 
010C° 
O10F 
out 
ons 
ous 
O117 
onl 
one 
onic 
OF 
0120 
oat 
O12% 
0127 
012A 
012D 
0130 
o13t 
0133 
on 


o1 
o1 
o13m 
o13cl 
0130 
013} 
Ore 
0140 
0143 
0146 
0147 
a14ae 
14a 
o14D 
0150 
ordi 
0152 
o1s4 
0197 
o1se 
O159 
O1sA 
o1sB 
ose 


while alternating control between each task. 


George W. Hawkins, NY 


Here's a 2 task (forepround/background?) alternating 
scheduler routine. 
divides the remainder of pare one in half and @anages two stacks 


This routine (which resides in page one) 


This allows two 


Programs to be run together in the Kim as long as each program 
uses the stack or separate memory locations for the storage of 


temporary data. 


Kia. 


o4 
AD 
FF 
os 


av 


FE 
FF 
02 
03 


o1 


04 
os 


oL 


04 
os 
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ol 
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17 
o1 
oL 
oL 
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17 


o1 
o1 


o1 
o1 
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BIT 
addr 





A CATALOG OF KIM-l1 ROM BYTES. (Hal Gerden, Oakland, CA) 
Fish in the Aug. 1977 KILOBAUD mak 
maska in memery le 





Amy byte in the KIM ROM can 
alse the absence ef 2 er mere bits (e.g. 
set the Z flag enly if the accumulater bits 9-3 are all 9 





The debug pregram TRACER by Larry 
je ef the 6502 BIT instruction, using 
ting ef bits in the accumulater. Since 
maske must be either at a s6ore-page er abselute 
rve as a mask, te teat met only single bits but 
BIT with a memory lecatien centaining @F will 

y. With the help ef a simple 





late eddreasing me 










































Set the add f k pregram, I found 175 ef the 256 pessibdle byt the KIM ROM, and recorded the as 
0100-01 ach br © 5 ress of task (program) one into addr fer each ene, The table (high nybb: m herizental, lew en vertical) giv 
“Ol, and the address of task two into 0102-03, Connect this addre +B-, an 98 exieta at addre: 1981). 
A1S to E4 and start at 0107. Control will alternate as 
determined by the interval timer delay value and division g 1 2 8 
rate in locations 0153 and 0155 respectively. Rescheduling 3 & 2 e 7 7 * i $ Kd bd Ls 
vill end when one of the programs {ssues a JMP START back to ® 185D 19h 1895 1974 1a99 193P 1469 183P 1989 1986 1814 1EFD 1684 
TIL 10. TASK 1 START ADDRESS (current!) © 2010) 1 1¢39 19D 1P6B 1cSF 1897 1DF4 1825 1861 198¢ Aceh 18BP 1684 
00, 
12. 00, TASK 2 START ADDRESS (curre t1y= 029°) 2 1653 1Cal 1E64 1646 1698 1FE2 1887 1612 gic 1015 
T2H 02, 
TSEI. 00. NEXT TASK TO EXECUTE (alte sates) 3 19EB 1CaS 1965 166F 1819 1cDy 19D 1¢7B 1EP9 18¢1 
. T INTER TASK 1 
TeTK Pe. ei eee k 1855 1999 1649 1949 1613 lcgP cad 196P 1868 1clg 
TIM LDA 1 00. START WITH TASK 1 5 1e7h 1¢91 1P92 1 FEA 1r92 1494 1858 lepe 1p2g ipr2 1628 
¢ TSF 
Ata A. 1,60 ZERO\ TASK 2°S STATUS WoRD 6 16BB 1615 1CBF 1Ak7 1948 ici 1c8 lglg LDA’ 1825 
Lox z Ll TASK 1 STACK POINTER 7 188D 18g) 1899 19,2 apEE igac 1847 1837 
s POINTER 
Mon E Aeon WOES CTAGE ROTTER 8 1981 1879 1a58 1949 19¢2 1B9C 1994 195¢ 19kc 1422 1898 164D 1618 
. aye LOAD A 9 199F 1897 196P 1066 1957 1696 1D2D 165 1694 1622 
oO Ege METH INTERRUET: ADONEDS 4 1644 1898 162D 1962 1¢6B 1CkD 1617 1DgB 1475 1cP7 1¢13 1619 186¢ 185F 
f nan a 
“NIGH TINT B 1DE2 1CEB 1PDP 1693 1075 1996 1862 
ei 8 iad set: Thess: SiAAT-ADenENS c 191¢ 1864 1941 1862 1c1a 197D 16D6 1994 1062 1893 1039 
Santon D 189¢ 1¢63 1789 1PDD 1662 1CRS 1691 1831 1636 1834 1as2 
Ct yreRRUPTS ON x 1493 1A16 1699 162B 1947 1974 198371997 1ER2 1FP4 1834 1C29 
Sta A 7l0F fe toga SON TIMER FP 1671 1673 1842 1692 1863 1967 Day 1c62 1898 1FEA 16B1 187" 1892 
JMP @ TIL START TASK 1 
TASK SWITCHING —————_— — —__ 
TINT PHA SAVE A 
TxA SAVE x 
PHA A Conpiler for the 6502 
1vA SAVE Y 
PHA Help is needed to complete development of a trble 
TSK GFT STACK POINTER driven com-iler for tne 6502. I hrve completed tie perser 
TxA ond the production procedure progr-ms but have hed trouble 
DY A TSEL Gtt TAK LY .tcTek dis decid) bhich lencuere to inplerent. Anyone intevested 
STA AY TSTK SAVE FF STACK POTHIER in tals compiler should coitact ne a2 to preference of 
TyYA SELECT OTHER TASK leacuacc, ‘iesired features, cte 
EoR tO, i clso aeed help tn fring ~ethods to irnlement 
Tay Peremeter -rssing to subro: Ss, formatted 1/0, nd 
STA A TSEL cherecter string handlinge If you feel thnt you covld help 
LUA AY TSTK START OTHER TASK solve t proolens please «:rite ne end I will send nore 
Tay information, 
Ys RESTORE STACK POINTER i 4% currently on » $.13 cL conriler but I do.'t 
LOA T O11, RESCHEDULE 1 INTERVAL heve » Crest deal of information o1 it. If enyone hes 
STA A 17.0F NF 1024 eectss oO 3.P descriptions of this end other lensuenes 1 
PLA would lr"ly pay for copyins. 
Ri Y 
a STORE: Contact: irlph Yoane, Box 33, Little Fort, 3.C. Cennia 
Tay RESTORE X Voz 2c0 
PLA RESTORE A end 
RTE BACK TO MORE USEFUL THINGS INC 


by Allen Anway 
1219 North 2Ist St. { 
Superior, Wi 54880 


Program BRANCH 
Ae 


{ times {'ve pressed the GO button and 
many times the KIM has flown off into hyperspace 
somewhere or the stack has punched out my carefully written program in 
page |. In self defense ! wrote BRANCH to go through my program, find 
the branch Instructions and force the branch to see where | would end 
up. This program Is fully relocatable and uses only locations 0000 and 
0001 In the regular RAM. The program uses a few locations at the top 
of page 0, but this is all right as long as you do NOT single step BRANCH. 
Enter the program at the beginning and press the following buttons: 


KEY 0 Decrement POINTH of address 

KEY 1 Decrement POINTL of address 

KEY 4 Increment POINTH of address 

KEY 5 Increment POINTL of address 

KEY C Seek branch instruction of the form %XXX1 0000 and stop there. 
(Be careful, program stops at DATA of this same form.) 


When keys held down continuously, 
the addresses will change contin- 
uously after a very short wait. 


KEY D Force the branch, starting at the branch Instruction address. 


KEY E Above branched correctly, restore old branch address, remain 
in thls program, next press C to look for another branch. 


"KEY F Above branched Incorrectly, stop the program but restore the old 
branch address so you can correct the erroneous entry. Then 
press PC and GO and check your new entry by pressing D. 





0343 08 STARTB CLD 

0344 AS FA LOA POINTL 

0346 65 EF STA PCL 

0348 AS FB LOA POINTH 

O34A 65 FO STA PCH ; PC button is enabled 

034C AS 00 LOA TEML 

O34E 85 FA STA POINTE 

0350 AS 0) LDA TEKH 

0352 85 FB STA POUNTH 

0354 Ad 80 ao LDA #$80 

0356 85 F3 STA NU; control repetition | 
0358 2019 IF At JSR SCAND } 
0358 FO F7 BEQ AO ; AO on no key pressed | 
0350 20 6A IF. JSR | 
0360 85 Fh STA | 
0362 AS F3 LDA | 
0364 85 FI STA | 
0366 20 19 IF Az JSR ! 
0369 FO 08 BEQ ; A} on key released 

0368 C6 FI DEC 

0360 DO F7 BNE ; AZ on key depressed short time 

036F Ad 10 LDA key held long time, 

037) 85 FR STA go for repetition 

0373 AS FA AJ LDA 

0375 C9 OF cue 

0377 bO OB BNE ; A‘ on not key F 

0379 AS 00 LDA key F = leave program 

0378 85 FA STA but set up for old branch instruc. 

037D A5 O01 LDA 

037F 65 FB STA 

0381 AC AF IC JHP 

0384 C9 OC AA CHP 

0386 DO 10 BNE AS on not key C 

0388 2063 IF A&I JSR key C = seek branch 

0388 20 19 IF JSR pick up program step from SCAND 

0386 AS FO LDA 

0390 29 IF AND ; look for branch format 

0392 ¢9 10 CHP 

0394 DO F2 BNE AbT =; AR} on branch not found 

0396 FO BC BEQ AO 3 stop looking, branch found mere 


0398 ¢3 0D AS CHP 
039A 00 3A BNE 
039C AS FA LOA 
039E 85 00 STA 
03A0 AS FB LOA 
03A2 85 O1 STA 
O3A4 20 63 IF JSR 
0347 20 19 IF JSR 
03AA AS FO LOA 
OAC 4B PHA 
O3AD 20 63 IF JSR 
0380 68 PLA 
0381 18 cle 
0382 10 09 BPL 
0384 65 FA ADC 
0386 80 02 Bcs 
0388 C6 FB EC 
03BA 18 ASI cLe 
03BB 90 06 Bcc 
03BD 65 FA AS2 ADC 
038F 90 02 Bcc 
03cl £6 FB INC 
03C3 85 FA A53 STA 
03cs 18 cic 
03c6 90 BC Bcc 
03C8 C6 FB Ab DEC 
03CA 80 8C A61 Bcs 
O3CC C6 FA AT DEC 
O3CE AS FA LOA 
0300 C9 FF CHP 
0302 FO FA BEQ 
0304 90 82 AT BCC 
0306 3 00 As CHP 
0308 FO EE BEQ 
03DA 9 0} CHP 
030C FO EE BEQ 
03DE C9 04 CHP 
03£0 FO 0B BEQ 
0362 C9 05 cMP 
03€4 FO 08 BEQ 
0366 C9 OE CHP 
03E8 FO OC BEQ 
O3EA 18 cic 
O3EB 90 £7 Bcc 
O3ED £6 FB a INC 
O3EF 80 09 BCs 
03F1 20 63 IF AIO ISR 
03F4 BO D4 Bcs 
03F6 AS 00 All LOA 
O3F8 85 FA STA 
O3FA AS 01 LDA 
O3FC 85 FB STA 
O3FE BO CA BCs 


#$00 
Ag H 
POINTL; 
TEML 
POINTH 
TEMH 
INCPT 
SCAND 

I WH 


INCPT 


AS2 5 
POINTL; 
ASI; 
POINTH; 


AS3 
POINTL 
A535 
POINTH; 
POUNTL 


AO i 
POINTH; 
Al 


POINTL; 
POIMTL 
ISFF 
a6 

al 


AB on not key D 
key 0 = perform jump 


go to next location 

pick up branch distance 
from INH 

next location for easy calc. 

AS2 on branch forward 

branch backward 


ASI on no page crossed 
Page crossed backward 


AS3 on no page crossed 
page crossed forward 
end of calculation 


from A] and AB 
absolute jump 


from AB 


absolute jump 


examine remaining keys 


3 A71 on no tegal key pressed 


absolute jump 


absolute jump 


key E = pick up old branch 
but remain in program 


absolute jump 


end 





ABIL 
Ablo 


Ags 
Ab7 
Abb 
A 
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Kj 
\ 
* 
H 
ar 
Re NM 
ot = 
vx 
rs 
« o~ 7 
32 RS 
YS SO 
Ss fs 8 
oS FSR 
ek ASK 
SN 
s 
2 
&3 
» x 
sys 
Ne 
$s 
ae 
w& 
x 
RY 
SY 
al 
8726 us 
K 
Qa 
tb 
SE 
vs 
os 
338 


Kin APPLIAT ON 
(IN & 
g 


{i * 
suyesBS (pierce compneareey 
NoTh: Lik A-K Wes Low WHE 


Aspeess 15 LESS THAN 2000 TEX 
OR Mowe THAN FF FO HEX. 


N TAKE ADVANTA 
Gow wee TOT sow- Zot, MEMORY) 


Kim -1 -—> S- 109, 


kim To S-0 buss. 
AQITER: ' 


By Jim fetioc 
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AN ER oF You Have KEquesr€D Gasic LEVEL FRoGRAM { 
EXPLANAT 104/35 


HARVEY LavS AN ExcELlENT TUTORIAL ON en 
ceo 
A SIMPLE MUSIC PROGKAM FOR KIM by Harvey Heinz 


Undoubtedly, the single most popular use for hobby computers is 

the programming and playing of games. However, another common 

use is the playing of music with the micro-computer. Most programs 
used for this purpose tend to be quite elementary and so it follows 
that the music generated leaves micii to be desired from a quality 
point of view. Dispite this, music is a good subject for the com- 
puter hobbyist to pursue, for the following reasons. 


1. The basic principals are very simple but can he elaborated 
on to any depree desired. In fact,electronic music can he- 
cone a hobby in itself. 

2. Writing a music program makes one very consious of execution 
times of his machines instruction set. 

3. Playing music on the computer is ideal for demonstrating, to 
the layman the versatality of these machines, 


As a KIM-l owner, I had an additional reason for attempting to 

write such a program. As you know, the 0530 has a programmable 
interval timer that may Le used to interrupt the MPU. 1 felt that 

by using this feature, a very simple program could be desirned. 

At the same time I would be gaining experience in using this valuable 
feature, and also learn something about using the interrupt, 


The program which evolved is flow-charted in Fig. 1. Actually there 
are two separate programs. The main routine consists mostly of 
initialization, The working part of this program though is the 

timing loop at the end. Every 4.microseconds Reg. Y is decramented. 
When the, contents of this register become 0, the outyut is torrled, 
thus pusing the speaker to the opposite position to the one prev- 
eously held, Register Y is then re-initialized, and the process 
repeats. This will happen continuously until the IHQ line is trig- 
gered by tie interrupt. The value eg. Y is initialized to determines 
the frequency of the note being piayed. 


The interrupt routine is only a little more complicated. The timer 
has originally been initialized to a value called TEMPO. This 
value is what determines whether the tune plays fast or slow. The 
timer is loaded with this value by accessing it with address 170F. 
This automatically programs the timer to count down 1 for every 
1024 clock periods. At the same time, I':7 is initialized to act as 
an interrupt flag. 


Approximately 20 times per second (with TEMPO equal to 286) the 
timer will reach O and initiate an interrupt. The constant LENGTH 
is then decremented and tested for OU. If not O, the timer is re- 
initialized, and return is then made to the main progran. If 
LENGTH is equal to O, the interrupt fetches the next note and next 
duration from the tune table after first checking that the tune is 
not over, After re-initializing the timer, return is made to the 
main routine which will now generate the new note. 


If the end of tune has been reached during the interrupt, a jump 
is made direct to the monitor, thus stoping the program. While 
this is not the proper way to return from an interrupt, in this 
case it does no harm. Fig. 2 is a listing of both programs. 


fiy.t--MUSIC PROGRAM 


The tune is listed as a separate table (from the program) and so 
may be easily changed. Fig. 3 is a listing for the verse and 
chorus of Swanee River. Even bytes are constants which represent 
the frequency of the note. The following odd byte is a constant 
which represents the duration of the note. Refer to Fig. 4 for 
the correct values to use when coding a different tune. 





& suitable value should be stored in TEMPO (OOEA) to deterni 
the speed the tune is played at. Try varying this value for! 
teresting effects. The first empty address after the table s.. ld 
be stored at OUVEl) to stop the program when the tune is over 


Fig. & is a list of musical notes with their correct frequency 
and period in microseconds. Because our demonstration progran has 
only a single time delay loop, the period must be divided by & 

to make it less then 1024. This dors no harm except to raise the 
frequency renerated. Our computer now sounds like a picolo or 
flute. This modified period is again divided by L (our 4 wec. 
timing loop) to give the proper arrument for that frequency. As 
this number is decimal,it is finally converted to Hexadecimal 

to give the correct constant for that note. 








The duration argument is derived by determinins, the shortest note 
in the selected musical piece. Assign an arbitrary value for this 
duration, Then simply assign interer multiples of this value for 
the longer notes. For Swanee River, I used 05 to represent 1 beat. 
Combining this value with 27 or 26 for TLLiPO works out about right. 


The hardware end of the project is also simple. Refer to pare 57 

of your User Manual. Hook up the speaker and transister amplifier 
as per the diagram, but connect it to PBO (A9}, Then connect PB7 
(A15) to IRQ (EL). This last connection should be made throuph a 
switch or alligator clip so it can be broken when using the cassette 
interface, 





Using the program can be a lot of fun, as well as being educational. 
Try slowing, down or speeding up the music by changing just the 1 
value TEMPO. That's a range of 256 to 1. Or play the tune backwards 
by changing only a few bytes in the program (decrement X). Or don't 
load a table at all.Just use the rirdom numbers in memory as a 
computer penerated tune. Anyway have fun, Isn't that what hobby 
computers are all about? 


Ralorn to 
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Fig. 2--Music Program for KIM-1 = Fig.3-Table For Swanee River Tune 
A. Main Routine 
pi E & 00vO B39 OOJG 7F OF 
ag O1 0100 LDA 01 Initialize boul 2 col 8 77 «+O5 
6D 03 17 + 2 STA PrbD I/O Port B Cc. 1 L b2 A OA OA 
8D FF 17 5 STA 17FF IRQ Vector High El 6 G5 c OF 19 
AQ 22 8 LUA #27 IRQ Vector low Dil 8 Aol —E BE U5 
8D FE 17 As STA L7FE 242: A G 2 OOLO GF OA 
A2 00 D LbXx yCO Register X c 2 c cok 2°77 la 
B5 OO F LUA TALLE,X Al E A 2 4 8E OA 
85 EB 0111 STA NOTE Store first note in WUTE tc 3 0010 EP 2 6 BZ VA 
Es 3 INK G4 2 A 2 8 BE OA 
B5 OO 4 LUDA TANLE,X BE 2 4 G 8 A OOF 28 
85 BY 6 STA LERGTH and LENGTH Cc 2 6 Ek c BE ls 
AS EA 8 LDA TEMPO Initialize TIMER D8 8 boil E US O05 
8D OF 17 A STA TINER Ek h © 1 0050 EF 05 
EE 02 17 D PLAY INC PLO Toggle output boil c El 2 HE OS 
AL EB 0120 LDY NOTE Initialize Keg. Y to NOTE c 1 E boul 4 U5 U5 
88 2 DELAY DEY Decrement Reg. Y E 1 020 c 2 © EF OA 
DO FD 3 BNE DELAY 1f not zero, return dol 2 G2 8 #77 =~OA 
FO F6 0125 BEQ PLAY Tine delay complete c 2 4 A 1 A 8E O5 
c 2 6 c 3 © 77 OF 
Al 8 G2 E GF OA 
B.Interrupt Routine c 3 A E 1 0000 KE O05 
G 2 c G2 2 EF 05 
Co ED 0127 DEC LENGTH Decrement LENGTH El B bas 4 De le 
“30 06 9. ANI NEXTH If zero, get next note c 1 vuu30 Cc 7 G EF 23 
AS EA Bb LDA TEMPO Heinitialize TIMER Ds 2 
&p OF 17 on 3 ee TIKER Cc 8 4 Load OOEH (END) with 68 
4 3 . And return to main routine y . 
EB 1 NBXTN IX Increnent Index legister Load UOEA (TEMPO) with 28 
EL EB 2 CPX EWD Test for tune over 
DO 03 4 BNE CONT then continue 
4c LF 1C 6 JMP START Yes. Go to KIM monitor 
B5 OO 9 CONT LDA TABLE,X Fetch next note (Freq.) 
HH 2) B STA NOTE and store in NOTE F 
El D INx Increment Index Ker. ip. &--- Musical Notes with Frequency,Period A n 
85 00 ue LIA TALI X Fetch next duration aa a: Rc Angupent 
5 ED 0140 STA LENGTH and store in LENGTH eee ; . 
AS EA 2 LUA TE.PO — ieinitialize TIMEK Note Frequency Period Feriod/& ggnstang,, 
8D OF 17 4 STA TINEK 
40 0147 RTI heturn to main routine c 3822.3 956 239 EF 
CH 3608 902 226 L2 
DA 3405 851 213 D5 
0000 Start of TABLE TABLE : aot Pars eames 
QUE8 Location of current note frequency NOTE F 286," sey 17 He 
OQOE9 Location of current note duration LENGTH Fs 2703 o76 169 re 
OOEA Constant here determines speed of tune TEMPO G 2551 638 100 ne 
OOBB Contains first empty address after tune END Gp 21.08 602 Int 07 
A 2273 5608 14? BE 
Ar 2145 5360 Ber 8o 
u 2025 506 12 7F 
¢ 1911478 120078 
CA 1804, 451 113006471 
b 1703 426 10? ob 
by O22 1607 402 101 65 
E O59 1517 379 5 5F 
THE FIRST BOOK OF KIM is becoming available in stores across the country. F U8 1432 358 90 5A 
cheas, Jim Butfeafield, and your editor put this book together with the Fy 740 1351 338 85 55 
idea of helping newcomers to our hobby to get up to speed on the KIM. (0% G 78h 1276 319 80 50 
course, the book's not just applicable to newcomers). The book includes a Ge 63) 1204 301 75 LB 
beginners guide to progtamming, several tutorials on hooking things up to A 680 1136 28k 71 47 
KIM, and a large number of game and utility type programs. (many of which An 932 1073 208 ov? 43 
have not been published as yet). The First Book Of KIM is 180 pages Long in K 988 1012 253 b3 3F 
an 64 X 11 foamat, It 44 available for $9.00 (plus $.50 postage) from: c 1047 956 239 60 3c 
Hie O. Box 311, Argonne, TLL. 60439. Personal checks will have to clear 
the baal 





» 40 please send a cashiers check or money order in U.S, funds. ILL. 
aeaidents please add sales . 
. 
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Aw Mp CONVERTER From... Witt Hargeod ings 


Here 1s a circvit for making very accurate A/D conversions using o 
Motorsla duai-.lope conversion chip. “Yith the values shown, 1 

get conversion: of up to 1490 counts with 1 bit accuracy compared to 
the best digital voltmeter we have; zero drift 1s non measurable. With 
a larger integrating capacitor, the circuit will count past 2000 counts; 
with a longer software tuming constant, you can get a full 16 blt count, 
but with a longer conversion time than the approximately S50 msec. my 
program uses. 


The input signal must be positive, although you can float the return Hine 

by about a volt if desired. I set the two potentiometers to mid-scale before 
beginning adjustments so they won't be too far off. The transistor can be 
any PNP device, and Is for protection against reversed input polarity, 

which otherwise might lutch up the chip. Finally, avold snapping the power 
supply on(by inserting a chip into a live socket); it can make the chip 

very non-linemr, or even dead, 


The software is relocatable, It is written for the output line to be FBO 
in KIM, and the input line to be PBS. ~The proaram controls the ramp 
line; when it is on, the 1405S integrator is going negative. When it goes 
below zero(actually below 8 reference voltage), the ramp is reset and 
the Integrator starts going positive. The up-ramp Is timed once it crosses 
zero, At the end of the tumed up ramp, the ra.np control line is sct, 
and the time required for the integrator to reach zero {s counted, This is 
proportional to the input value. Subtracting an offset of S or 10 percent 
. of the upramp count improves operation near zero; the exact amount 
subtracted is not critical, Notice the instructions to disable interrupts 
during the critical counting periods; the software must not be disturbed 
during this pertod, 


The spec sheet on the MCI1SOSL and Motorola Application Note #AN-757 
contain more information on the chip and its use. Iam currently using 
this circuit preceeded by an andlog multiplexer to read up to 16 inputs 
accurately in less than | second, using only two computer interface lines. 
1 find the circuit much easler to use than a 12 bit parallel A/D, and much 
cheaper in the bargin, 


The chip operates by inteqrating # current prop tional to the input for = fixed 

th ie pertod(set by the timing constant for the up-ramp). Then a down ramp 
period subtracts a reference current unul the intcerating cepacttor returns to srr: 
Thus many circuit variables balance out. Luading Y with $06 and X with SOO ts sn 
up-ramp constant of $0600, or 1500 decimal. uring thy up-ramp, this numb ri 
counted to zero te ive the up ramp delay time. Onc Is reached, the re~ 
direction is reversed, and the seme realsters ore counted up until the tintecratioe 
capacitor retumeg to its original level. “ith the software as itis, lLaet 15 
decimal counts at an input voltege of 1,5 volts. lowever, the circuit count 
somewhat higher than thi: before getting non-lincar, 








Tb¢ reache full 16 bit count of 65,009, 3 leraer up ramp timing con: tent can 

be specified, This will cherge the timing cepacitbr for a longer time, ond resuit 

in higher counts for a particular input voltage. You MAY have to increase thr 

of the integrating capacttor to prevent it from limiting; and conversions will te + ager 
as the size of the count anes up, The software as shown results in 16 bits it 
but with o mazimun count of 2000 decimal or soz(cn 11 bit renge). Liddle with 

the timing can tant until the system counts lines rly um to the desired nena; th 











fet the gore fort constant to between So ent 0 f the up-ramp constant. 
Jdjust the zers ff. ct constant until the cinouft sr op then trim the © in potent tr 
fwthe exact ing gir i, ond finally, reostrin the vers vith the gone contrat, 








Ve includ. foaeth i which adds 2 sin, ' hutcl hinary to bed ( /O 
convervior. shore € bit number hold trobebly be chang. d 
t. 1? to evold contusion 
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i INPUT MODULE OFFRATES A SET-RESET DUAL-SLOPE A-D CONVERTER. 
ENE ENE 9209 
FBO IS OUTFUT LINE 10 A-D. 
THIS MODULE INCLUGES BCD CONVERSION. 
SSAINPUTS = NONE “OUT UTS —=HSB> BNR tS BORN 
+SKIF 2 
INFUT LDA #°0C000001 TURN RAMP ON AT F 50 
Oth FEIN fA Z 
STA PEBATA 
LDA #820 MASK FOR THIS INFUT 
FE — Fe FOP RDA TA —— 
ENE TEML LOOP TILL COMP GOES LOW 
LUX 90 
tB¥-#966 -——- FEMENG CONSTANT FOR -UP—RAHP— 
DEC PEDATA TURN RAMP OFF 
TEM2 RIT PRDATA 
——— REQ TEM? -——-—~ LOOP-T Itt—COMP-B0F 3 -HIGH-—--———_-—- —— —— 
SEL BISABLE IRQ 
TEMS DEX 
"BNE TEMS — =i Ss eee - 
EY 
ENE TEMX 
ae ING-PEDAFA—— TURN: RAMP~ON —— = SS 
TEM4 = INX 
ENE TEMS 
IN¥——- 
TEMS EIT FRDATA 
BNE TEMA 
—thf—- ~-—— £NABLE-FRO- = a — ares 
HEC FRDATA LEAVE RAMP OFF TO EQUALIZE CONVERSION TIMES 
1xA SUBTRACT OFFSET Ti IMPROVE OFERATION NEAR ZERO. 
see == - = eae hers 
SEC €$40 












































- = AP AHES POENT+—-£6- FIT RintkY—-19-IN-Y-ANT X2- > 
more... _ 


+SKIP 4 


$ SUB-MODULE ECD. NORMALLY ENTERED FROM INFUT AROVEr BUT 
—*fAN ALSO FE CALLED ENBEPENDENTE Ys — > - TY 


; 
# THIS MODULE CONVERTS A 16 BIT BINARY NUMBER INFUTTED IN 
ANE ENT O -THE-4- DEE IMAL DIGITS CON FAINED -&Y- MSD-ANE -t SBx——--—-— 
# IT COUNTS DOWN Yy ALDING 256 TO LSD+MSEs THEN IT COUNTS [OWN 
* X WHILE ADDING 1. 
=n IF 4- 7 Sy se tes eee : arn Sennen Sheen 
BCD OSE USE DECIMAL ADEITION 
lta #0 CLEAR QUTFUTS 
S¥*-t SB - 
STA MSD 
CFY #0 IF MSBITS = 0+ DO LSBITS 
FE-PE H2— da 
BCO1 = CLC AUD 256 TO QUTFUT 
Lota Lsp 
FE 95 $$. 
STA LSD 
LDA MSD 
tre 0 
STA MSD 
DEY AND DECREMENT MSBITS BY 1 
BNE BCD1 LOOP TILL ZERO 














BCD2 CPX 40 
REQ BCD4 
BCDS cLc ADD 1 TO OUTFUT 
LbA LSD 
81 
STA LSD 
LDA MSD 
ARE OO mn oc —_—— ———— 
STA MSD 
DEX AND DECREMENT LSBITS 
———— PvE: BEB3——_+4. BOP. t—-2€RO—_—--- - —-— -———_______._____ 
BCD4 LOX MSD 
LDY LSD 
—€t Be : a 
RTS 
COPY COMPLETE. 


IF LSBITS = O+ DONE 














KIM BLACKJACK Jim Butterfield 
May 28, 1977 14 Brooklyn Avenue 
Toronto M4M 2X5, Canada 


Descriptions 


KIM uses a 'real* deck of cards in this game. 
. So when you've seen four aces going by, you know 
that there will be no more - until the next shuffle. 


BLACKJACK starts at address 0200. You'll see the 
cards being shuffled - the word SHUFFL appears on the 
display - and then KIM wil) ask how much you want to bet. 


You'll start with an initial amourit of $20. Your balance 
is always shown to the right of the BET? question, so 
on the first hand, you'll see BET? 20 on the display. 


You may bet from $1 to $9, which is the house limit 
The instant you hit key 1 to 9 to signal your bet, 
KIM will deal. Of course, you can't bet more money 
than you have ... and KIM ignores freeloaders who try 
to bet a zero amount. 


After the deal, you'll see both your cards on the left 
of the display, and one of KIM's cards on the right. 
(KIM's other card is a “hole” card, and you won't see 
At until it's KIM's turn to play). Aces are shown 

as letter A, face cards and tens as letter F, and 
other cards as their value, two to nine. As always, 
Aces count value 1 or 11 and face cards count 10. 


You can call for a third card by hitting the 3 button .. 
then the fourth card with the 4 button, and so on. 

If your total foes over 21 points, KIM will ungrammatically 
say BUSTED, and you'll lose. If you get five cards 

without exceeding 21 points, you'll win automatically. 

If you don’t want any more cards, hit key 0. KIM will 
report your point total, and then will show and play 

its own hand. KIM, too, might ¢o BUSTED or win on 

a five-card hand. Otherwise, the most points wins. 


From time to time, KIM will advise SHUFFL when the 
cards start to run low. 

Remember that you have a good chance to beat KIM at 
this game. Keep track of the cards that have been 


dealt (especially aces and face cards), and you're 
likely to be a winner! 


KIM BLACKJACK 


0200 A2 33 START LDX #51 52 cards in deck 

0202 BA DKt TXA Create deck 

0203 95 4O STA DECK,X by inserting cards 

0205 CA DEX into deck 

0206 10 FA BPL DKi in sequence 

0208 A2 02 LOX #2 Set up 3 locations 

020A BD BB 03 INLOP LDA INIT,X «sinto.. 

020D 95 75 STA PARAM zero page 

O20F CA DEX addresshi/ dpt/ amt 

0210 10 F8 BPL INLOP 

0212 AD O% 17 LDA TIMER use random timer 

0215 85 80 STA RND to seed random chain 

0217 DB DEAL CLD main loop repeats here 

0218 A6 76 LDX DPT next-card pointer 

021A EO 09 CPX #9 less than 9 cards? 

O21C BO 34 BCS NOSHUF 9 or more, don't shuffl 
1 shuffle deck 

O21E AO DB LDY #SHUF-$300 Set up SHUFFL meg 

0220 20 57 03 JSR FILL put in WINDOW 

0223 AO 33 LDY #51 ripple 52 cards 

0225 84 76 STY DPT set ful) deck 


0227 20 30 03 SHLP JSR LIGHT illuminate display 
O22A 38 SEC 


022B A5 81 LDA RND+1 Generate 

022D 65 &2 ADC RND+2 new 

022F 65 85 ADC RND+5 random 

0231 85 80 STA RND number 

0233 A2 04 LDX #4 

0235 BS 80 RMOV LDA RND,X move over 

0237 95 81 STA RND+i,X the random 

0239 CA DEX seed nunters 

023A 10 FO BPL RMOV 

023C 29 3F AND #$3F Strip to 0-63 range 

O23E C9 34 CMP #52 Over 51? 

0240 BO E5 FCS SHLP yes, try new number 
1 Swap each card i:.to random slot 

0242 AA TAX 

0743 B9 4o 00 LDA DECK,Y ;et next card 

O746 4B PHA rave it 

0247 BS 4O LDA DECK,X ret random card 

074s 99 ho 00 STA DECK,Y into position N 

Orbe 68 PLA and the original card 

0274D 95 bo STA DECK,X into the random slot 

O24F 88 DEY next in sequence 

0250 10 D5 BPL SHLP bek for next card 


more a 


KIM BLACKJACK 


1 ready to accept bet 
0252 AO DE NOSHUF LDY #MBET-$300 Set up BET? msg 
0254 20 57 03 JSR FILL put in WINDOW 
0257 AS 77 LDA AMT display balance 
0259 20 A6 03 JSR NUMDIS «+ put in WINDOW 
025C 20 30 03 BETIN JSR LIGHT illuminate display 
O25F C9 OA CMP #10 not key 0 to 9? 
0261 BO F9 BCS BETIN nope, ignore 
0263 AA TAX 
0264 86 79 STX BET store bet amount 
0266 CA DEX 
0267 30 FZ. ~ BMI BETIN zero bet? 
0269 E4 77 CPX AMT sufficient funda? 
026B BO EF BCS BETIN no, refuse bet 

+ bet accepted - deal 
026D A2 OB LDX #11 Clean WINDOW and 
-026P A9 00 LDA #0 card counters 
0271 95 90 CLOOP STA WINDOW,X 
0273 CA DEX 
0274 10 FB BPL CLOOP 

1 here come the cards 
0276 20 78 03 JSR YOU one for you.. 
0279 20 8F 03 JSR ME « one for me.. 
027C 20 78 03 JSR you another for you.. 
027F 20 64 03 JSR CARD put my second card.. 
0282 86 7A STX HOLE +-in the hole 
0284 20 28 03 JSR WIITE wait a moment 

s deal complete - wait for Hit or Stand 
0287 20 30 03 TRY JSR LIGHT 
O28A AA CA TAX DEX key input? 
028C 30 11 BMI HOLD zero for Stand? 
O28E EL 96 CPX UCNT N for card #m? 
0290 DO F5 BNE TRY nope, ignore key 

+ Hit - deal another card 
0292 20 78 03 JSR YOU deal it 
0295 C9 22 CMP #$22 22 or over? 
0297 BO 4o BCS UBUST yup, you bust 
0299 EO 05 CPX #5 5 cards? 
029B FO 53 BEQ UWIN yup, you win 
029D DO ES BNE TRY nope, keep going 

1 Stand - show player's total 
O29F A5 95 HOLD LDA WINDOW+5 save KIM card 
O2A1 4b PHA on stack 
O2A2 A2 00 LDX #0 flag player .. 
02A4 20 OF 03 JSR SHTOT ++ for total display 
O2A7 A2 04 LDX #4 
.02A9 AJ 00 LDA #9 
O2AB 95 90 HLOOP STA WINDOW,X clean window 
O2AD CA DEX 
O2AE 10 FB BPL HLOOP 

1 restore cisplay card and hole card 
02B0 68 PLA display card 
O2B1 85 95 STA WINDOW+5 back to display 
02B3 A6 7A LDX HOLE get hole card 
02B5 20 6D 03 JSR CREC rebuild 
02B8 20 92 03 JSR MEX Play and display 


1 KIM plays here 







O2BB 20 28 03 PLAY JSR WLITE Pause to show cards 
O2BE AS 9A LDA MTOT point total 

02C0 C9 22 CMP #$22 «+22 or over? 

02C2 BO 29 BCS IBUST yup, KIM bust 
02C4 65 9B ADC MACE add 10 for aces? 
02C6 Ab 91 LDX WINDOW+1 five cards’ 

02C8 Do 18 BNE IWIN yes, 

O2CA C9 22 CMP #$22 22+ including 

02CC 90 02 BCC POV nope, count a 

O2CE A5 9A LDA MTOT yup, ace low 


02D0 
o2D2 
O2D4 
02D7 


02D9 
02DC 
O2DF 
O2E2 
O2E4 
O2E6 
O2E8 
O2EA 


O2ED 
02FO 
02F3 
O2F5 
O2F7 
02F9 
O2FB 
O2FD 
O2FE 


0300 
0302 
0305 
0307 
0309 
0308 
030D 


030F 
O31 
0313 
0315 
0317 
0319 
0318 
031C 
O31E 
O31F 
0321 
0324 
0325 


0328 


cg 


20 
Do 


20 
20 
20 
AS 
FB 
ES 


4c 


20 
20 
AS 
FB 
65 
Ad 


98 
Do 


A2 
20 
AS 
C5 
FO 
RO 
90 


BS 
FB 
25 
cg 


95 
D8 
BS 
48 
AO 
20 
68 
20 


AO 
20 


22 


to) 
03 


03 
03 


03 


iF 
iF 


POV CMP #$17 
BCS HOLD2 
JSR ME 
BNE PLAY 
1 KIM wins here 
UBUST JSR WLITE 
JSR BUST 
JSR WLITE 
IWIN LDA AMT 
SED SEC 
SBC BET 
JLINK STA AMT 
XLINK JMP DEAL 
s Player wins here 
IBUST JSR BUST 
UWIN JSR WLITE 
ADD LDA AMT 


17 or over? ( 
yes, stand.. 12 
nO» hitee 

unconditional Branch 


show player's hand... 
make BUST message... 
«sand show it 
decrease balance 


+.by amount of bet 
store new balance 
next play 


make BUST message... 
display pause 
increase balance 


SED CLC 

ADC BET by amount of bet 
LY #$99 99 maximum... 

BCC NOFLO- have we passed it? 


TYA os, restore $99 
ANE JLINK onditiornal branch 
+ KIM stands - compare points 












HOLD2 LDX #3 flag KIM.. 
JSR SHOTOT for total display 
LDA MTOT "s total.. 
CMP UTOT Player's total.. 
SEQ XLINK ame, no scorer 
BCS IWIN RiM higher, winss 
BCC ADD KIM lower, loses. 


; subroutines start here A 
; SHTOT shows point totals per X register 
SHTOT LDA UTOT,X player's or KIM's total 


SED CLC 

ADC UACE,X try adding Ace points 

CMP #$22 exceeds 21 total? 

BCS SHOVER es, skip 

STA UTOT,X no, make permanent 
SHOVER CLD 

LDA UTOT,X get revised total 

PHA save it 

LDY #TOT-$300 set up TOT- msg 

JSR FILL put in WINDOW 


PIA recall total 

JSR NUMDIS insert in window 
3 display pause, approx 1 second 
WLITE LDY #$80 timing constant 
WwbO JSR LIGHT illuminate screen 


DEY 
BNE WDO 


countdown 


y illuminate display 


LIGHT STY YSAV 


save register 


LDY #$13 
LDX #$5 6 digits to show 
LDA #$7P 
STA PADD set directional reg 
DIGIT LDA WINDOW,X 
STA SAD character segments 
STY SBD character ID 
WAIT INC PAUSE 
BNE WAIT wait loop 
DEY DEY 
DEX 
BPL DIGIT 
JSR KEYIN switch Dir Reg 
JSR GETKEY test keyboard 
LDY YSAV restore Y value 
RTS 


0355 
035? 
0359 
0355 
035D 
0360 
0361 
0363 


03B5 


AO 
hy 


O3BA 60 


03BB 
03CB 
0308 
03E2 


E? 
95 


00 
DB 
F6 
pe 


00 


03 
03 


03 


03 


1F 


1F 


F8 


y fill 
BUST 
PILL 


FILLIT 


+ deal 
CARD 


CREC 


4 card 
You 


YOVER 


+ card 
ME 


MOVER 


WINDOW with BUST or other message 
LDY #$BST-$300 

STY POINTR 7 
LDY #5 six digits to move 
LDA (POINTR),Y load a digit 

STA WINDOW,Y put in window 


DEY 

BPL FILLIT 

RTS 

a card, calc value & segments 
LDX DPT Pointer in deck 
DEC DPT Move pointer 

LDA DECK,X Get the card 

LSRA LSRA_ Drop the suit 
TAX 0 to 12 inX 

CLC no~ace flag 

BNE NOTACE branch if not ace 
SEC ace flag 


LDA VALUE,X value from table 


foc SEGS,X segments from table 
to player, including display 4 count 
JSR CARD deal card 

INC UCNT card count 

LDX UCNT use as display pointer 
STY WINDOW-1,X put card in Wndw 
Lpy #$10 ten count for aces 

BCC YOVER no ace? 

STY VACE ace, set 10 flag 

CLC SED 

ADC UTOT add points to.. 

STA UTOT +-point total 

CLD 

RTS 

to KiM, including display & counts 
JSR CARD deal card 

DEC MCNT inverted count 

LDX MCNT use as (r) display pontr 
STY WINDOW+6,X into window 

Loy #$10 ten count for aces 

BCC MOVER no ace? 

STY MACE ace, set 10 flag 

CLC SED 

ADC MTIOT add points to.. 

STA MTOT ++ point total 

CLD 

RTS 


» transfer number in A to display 


NUMDIS 


PHA Save number 

ISRA LSRA extract left digit 
LSRA LSRA 

TAY 

LDA TABLE,Y convert to segments 
STA WINDOW+4 

PLA restore digit 

AND #$0F extract right digit 
TAY 


LDA TABLE,Y convert to segments 
STA WINDOW+S 
RTS 


1 tadles in hex format 

20 01 02 03 04 05 06 07 08 09 10 10 10 10 
CF E6 ED FD 87 FF EF Fi Fi Fi Pi 

BE Fl Fl BB FC F9 F8 Dj 

co FC BE ED 87 F9 DE 


O3EC 


——aa™qSaS———— 





J 7 


(Extended I/O Monitor) 
A TTY, command oriented, programming tool for KIM-1l 


1. Resides in 1K of memory. Relocatable (with checklist) 


and ROM-able. 
2. Adds 17 commands to resident KIM TTY monitor. 
3. Includes 4 user defined commands for expansion. 


4. Designed around a modular concept for easy modification. 


FUNCTIONS, 


*Load alpha-nuneric (ASCII) characters into ram via TTY. 

*Print a memory block on the TTY as alpha-numeric (ASCII) characters. 
*Calculate relative branches. 

*Compare two data blocks and display all discrepancies. 

*Load op-codes and operands into memory sequentially via TTY. 
*Execute a proaram at a designated address. 

*HEX Dump: Display memory as a 16 column matrix of two digit HEX codes. 
*Jump to the KIM monitor. 

*Fill a data block with a constant. 

*Move one block of data to another. 

*Block-search for a string of data up to 256 bytes long in any 

given block and display the starting address(es) of the string. 

*Set up the audio tape address buffers via TTY in sequential fashion. 
*CONTROL D. Used for command termination, during initialization. 


Break point (BRK) service routine. 





BRK point processing routine saves and displays all CPU registers 
on the TTY. Status register is printed as a string of 1's and 0's 
for program debugging. 


Features OP-code reinsertion at BRK point for multi BRK processing. 


PYRAMID DATA SYSTEMS 
6 Terrace Ave. 

New Egypt, N.J. 
08533 


Manual & Cassette: $12.00 

Manual & Punched tape: $10.00 
(post paid USA) 

NJ residents add 58 tax. 


{ 


A NumaeR oF YoU HAvE WANTED ALIST OF 
KIM PloniTeR Ravrin€s with ExXPtAHATIONS 


MAIN 


SUB TS 


MAIN 


eeee KIN-1 


NAME 


DuMPT 
LoaoT 
Iytved 
CHT 
OuTBIC 
OuThT 
HEXOUT 
OuTLHT 


ONE 
mRd 
INCVES 
ROBYT 
ROBYT2 
PackT 
ROCHT 
RORLT 


PELCAL 
SAVE 
SAVEL 
SAVE2 
RST 
DETCPS 
START 
CLEAR 


REAO 


5UB°S 


TTYKB 
GETK 
GETS 
Data 
ADOR 
STEP 
PCCMD 
Load 
Laavs 
ouse 
SPACE 
SHOW 
RIRN 
GUEXEC 
SCAN 
FEEO 
MODIFY 


PRTPNT 
CRLF 
PRIST 
PRTSYT 
HEXTA 
GETCH 
GETS 
INITS 
TNITL 
ourse 
OUTLH 
DELAY 
DEHALF 
aK 


be S sTUFL pbedr eT 


mollebakken 27 
uDERUE 
6430 NokoBguRe 

DEN™ Aric 





<f9TJENT PXOLRAM*S €40 SUARIUTINESS St9e 


HU MENT 


nate aba TO TAPE 

LOAD MEM FEOM TAPE 

Sue TO MIVE SA TO VEB bed 

CUMPUTE ZHXSUM FOK TAPELMar. RT USCS ¥ Tu SAVK & 
QUTPUT UNE BYTE. USES Y TO SA¥X SYTE 

OUTBTC «1T+oUr CHKSUM 

CONVERT USO OF A TT ASCEE AND OITPUT TO TAPE 

OQuTPUT TO TAM UNE ASCIT CHAR VIA Sum*S ONE * ZERO 

OUTPUT "18 TO TAPE. 9 PULSES 130 MICRUSEC EACH 

OuTPUL *9* TO TAFEs 6 PULSFS 207 MICROSEC EACH 

SUB TU INC VEdele2 

SuR TU KEAD AYTE FROM TAPE 

MULTE ENTRY POINT 

PACK A=ASCII INTO SAVK AS HEX DATA 

GET 1 CHAR FROM TAPE. RETURN CHAR IN Ae USE SAVKeL TO Adt Coan 
GETS UNE BIT FRUM TAPE ANDO KFTURNS IT IN SIGN OF A 


OUTPUT 166 MICROSEC PULSE STRING FOR TAPE-PLL CALIBRATION 
KIM ENTRY VIA STOP (NMI) OR BRK CIRY) 

KIM ENTRY VIA JSR (A LOST? 

(1SSP Xe Ye S ' 
KIM ENTKY VIA &5T 
DETECT CHAR PER SEC 
MAKE TTY/K8 SELECTION 2 
CLEAR INPUT BUFFER INHy INL AND REAO 
GET CHAR 

MAIN ROUTINE FOR RFYRUARD AND TISPLAYs 
KIM-KEYO ARD FETCH-PROGRAM 

TEST CHAR ITN VETCRS 

SHIFT CHAK IN A INTO HIGH ORDER NIBBLE AND DISPLAY 
O1SP ADR 

INCPT ¢ START 

OISPLAY PC oY MOVING PC 
LOAD PAPFRIAPE FRUM TTY. CHECK FOR *3° 

LOAD PAPERTAPE FRUM TTY. CHECK FOK BY TECOUNT 

DUMP 10 Tly FROM UPEN Ceti ADKESS TO LIMHL® LTMHH 
OPEN NEw CELL 

PRINT OPEN CFLL 

OPEN NEXT CELL 

RUN-15Se PRUGRAM RUNS FROM OPEN CELL ADR 

TTY-CMO DETECTION PROG 
OPEN PREVIOUS CELL. PRINT 
GET CONTENTS UF INPUT RUFF 


BAUO-KATFE D 


IF NO KEYe a= 0 


TO POINT 


INL ANU STORE IN LOC SPECIFIc™ ay POINT 
SUB TU PRINT POINTLe POINTH 

SuB TO PRINT CR + LF 

PRINT STRING JF ASCII CHAR FROM TOP+x TO TOP 
PRINT ONE 4EX HYTE AS TwO ASCIT CHARTS 
CUNVEKT TO HEX NIBBLE ANDO PRINT ASCII 

GET 1 C4AR FRIM TIYs CHAR IN Ae X PRESERVED. 
GETCH MULTI ENTRY POINT 

INITIALIZATION FOR SIGMA 

INITS MULTI ENTRY POINT 

PRINTS 1 SPACE 

PRINT 1 CHAK = As X PRESERVED. Y = FF 

DELAY I BIT. TIME AS DETERMED BY DETCPS 
DELAY HALF BIT TIME 

KEY NUT DEP OR TTY MODEs A=0- 


y= Fe 


KEY DEP OR KB MODEe A NOT (eRU 


ONEKEY 
SCAND 
SCANDS 
CONVD 
INC PT 
GETKEY 
CHK 
GETBYT 
Pack 
REXRUM 
HE KALP 
IP DATE 
OPEN 


TAB 


( 


LIYE AKy BUT X- ¥ NOT 
Nutpur 3 BYTES TO 7 SEGMENT DISPLAY. 
OUTPUT IQ 7 SEGMENT DISPLAY. 

CONVERT AND DISP HEA. (SCANDI 

SUB TO INCREMENT POINTLy POINTH 

FROM KEYBOSK0. A = KFYVALUE*s ILLEGAL OR NO KEY FOR A Glo 15 
SUB TO COMPUFE CHECK SUM 
GET 2 HEX CHAR*S AWD PACK INTU INL+ INH. X PRESEL VFO. 
Sate T CH&n AN A INTO INL» INie & = QO FOK MEX 

CONVERT TO [FX NUM WITHOUT CHECK. A = 0 

COMVEKT TO HEX ALPHA 

SHIFT & INTU MSD AND STURE IN 
MVE 1/0 BUFFER INL» IN 


INITIATES | 4 
DATA SPECIFIED BY POINT 
Yzo 


1/0 BUFFER INLe 
TO PulaTus PUINTH 


TNH 


KIM UCSSAGH TABLE &£NO 7-SEGMr NT CONVERT TABLE 








A Kim BiBHOGRAPHY FROM... 


Ohio Scientific Instruments, 
“Model 300 Computer - Trainer Lab Manual” 


Witemam R. Dac 

428 Rostyn Ave 

Axrow , Our 
44320 


11679 Hayden Ave., Hiram, OH 44234 


A series of 20 programs for instruction on the 6502 microprocessor 


based Mode! 300 Trainer. 
operation, 


Programs are easily adapted to KIN-1 


Ohio Scientific Instruments, 11679 Hayden St., Hirom, OH 44234 
“Application Note No. 2" 
OSI 480 Backplane and Expansion System. 


Ohio Scientific Instruments, 11679 Hayden St., Hiram, OH 44234 
“OSI Application Note No. 5” 
Interfacing OST Boards to other systems including KIM-1l. 


Ohio Scientific Instruments, 11679 Hayden St., Hiram, OW 


46234 


“OSI Model 430 Super I/O Board Instruction Manual” 


Ohio Scientific Instruments, 11679 Hayden St., Hiram, OH 44234 
"Model 420C, 4K Memory Expansion Board" 
Instruction Manual - use together with OSI Application Note 
No. 2 on the 480 Backplane and Application Note No. 5 on 
interfacing OSI boards to other systems including KIM-1. 


ON-LINE, 24695 Santa Cruz Ilvy., Los Gatos, CA 95030 
This classiffed ad newsletter often announces KIM-1 and 6592 


software and hardware accessories. 


Helmers, Cari, 


18 issued $3.75. 


"There's More to Blinking Lights Than Meets the Eye” 


Byte 1, No. 5, pp. 52-54 (January 1976) 
A program for creating patterns of flashing lights (LEDs). 


Lloyd, Robert G., " 





ere's More to Blinking Lights, etc.” 


KIM-1/6502 Users Notes 
A KIM-1 version of Carl Helmers earlier program in Byte. 


Ziegler, John, "Breakpoint Routine for 6502" 
Dr Dobbs Journal 1, No. 3, pp- 17-19 (1976) 


Requires a terminal and a TIM Monitor. 


Upon entering, the 


program counter is printed, followed by the active flags, 
accumulator, register, Y register and stack pointer. 


Anon., “What's New Kim-o-sabee?" 
Byte 1, No. 8, p. 14 (April 1976) 
Brief notes on KIM-l. 


Espinosa, Chris, "A String Output Subroutine for the 6502" 
DDJ 1, No. 8, p. 33 (September 1976) 
This routine saves pointers, loops, etc. in outputting the string. 


Meier, Marcel, "6502 String Output, Revisited” 
DDJ 1, Ko. 10, p. 50 (November 1976) 
Further mod of Espinosa’s earlier routine. 
ANON., "Control Logic for Microprocessor Enables Single Step” 
Electronic Design, p. 78 (October 11, 1976) 
Uses 6502 system. 


ANON,, "6502 Dissesembler” 
Interface Age, p. 14 (September 1976) 





Butterfield, Jim, "KIM Goes to the Moon” 

Byte 2, No. 4, pp. 8-9, 132 (April 1977) 
‘A lunar lander program; see also same program in KIM-1/6502 
wsers notes. 


Hybrid Technologies, P.O. Box 163, Burnham, PA 17009 
"Ad for KIM-1 Peripherals” 
Byte 2, No. 8, p. 157 (August 1977) 
2K/@& ROM based, EProm Programmer, 2K/4K/8K Ram bosrds, 
assembler board, TV Interfsce board, relsy board, mother boards. 
Laabs, John, "Build a $20 EPROM Progranmer™ 
Kilobaud No. 9, pp. 70-77, (Sept 1977) 
KIM-1 is used to run software and some external hardware to 
program the 5204 4k EPROM. 


Ohio Scientific Instruments, Hiram, Ohio, 44234, "A Computer that 
Thinks tn BASIC™ 
Kilobaud No. 9, p. 10, (Sept 1977) 
Announcement of OSI's Model 500 CPU board built on 6502. 
Complete with 8K Basic in ROM for $298. 


Clarke, Sheila, "A PET for Every Home" 

Kilobaud No. 9, pp. 40-42, (Sept 1977) 
A look at the Comrodore PET 2001 based on the 6502. About $600 
includes Video terminal keyboard, 12K, (8K Basic in ROM and 4K 
operating system). 


American Institute for Professional Education, Carnegie Bldg., 

Hillcrest Road, Madison, N. J., 07940, "Microprocessing Fundamentals” 

Circular Advertisement - approx. Aug 15, 1977. 
Or. Joseph 8. Ress, Purdue Univ. and Or. Garnett Hill, Oklahoma 
State Univ. will present a course in Fall of 1977 at several 
locations. Course is based on KIM-1 hardware together with 
instruction in Digital Devices, Programing Fundamentals, 
Advanced Programing, Peripherals, 1/0 addressing, applications, 
etc. Cost about $600 including a KIN-1 to keep after the course. 


Gregson, Wilfred J. 11, "RT7Y with the KIM" 

‘73 Magazine 9 Ko. 204, p 110-112 (Sept 1977) 
A clever program for using KIM-1 and the 6-digit LED display as a 
readout for a RTTY signal. Simply feed the audio from a recelver 
into the tape input of KIM-1 and read the message as it flows 
across the display (about 45.5 baud, 60 wpm). Can also handle 
other ratio to 100 baud). Can also use KIM-1 as a display only, 
operating from an already available terminal unit. 


Bumgarner, John 0,, "A-KIM-1 Sidereal/Solar Clock" 
Interface Age 2 No. 9, p-36-37 (Aug 1977) 


Atkins, R. Travis, "A New Dress for KIM" 

Byte 2 No, 9, p-26-27 (Sept 1977) 
Describes mounting the KIM-1 in a briefcase together with power 
supply, prototype boards, etc. 


T 
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co 
ro 
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Fe 
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Fo 
co 
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20 
ce 
ac 
20 


be 


20 
ag 
as 
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ob 
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Chamberlin, Hal, 


Music" 
byte 2 Bo: 8a 062-83 (Sept 1977) 

neral Discussion of Music Generation plus detailed information on 
application to KIM-1 and a description of the hardware and software 
for a D/A music board and software package being marketed by Micro 
Technology Unlimited, 29 Mead St., Manchester, N.J., 03104. PC 
board alone is £6.00, assembled and tested D/A board $35,00, 
software packace on KIM cassette {s $13.00 additional. 


Beals, Gene, PO Box 371, 


"A Sampling of Techniques for Computer Performance of 


Montgomeryville, PA 18936, "User Group for the 


Commodore PET 2001 Computer" 


Ref: 


On Line 2 No. 11 pg 2 (Aug 24, 1977) 


Yearly membership $5.00 brings Users Notes Publication. 


Cater, J., 11620 Whisper Trail, San Antonio TX * 
8K Basic on your 11M or JOLT* Rn Tee ane 
in Line 2 


Firth, Mike, 104 N. St. Mary, Dallas, Texas 75214, 
of Command Coder for 6502 plus addresses." 
On Line 2 No. 


House, Gil, PO Box 158, Clarksburg, Md., 20734, 


Cost $ 
or JOL 


Cost: 


Labeler." 
On Line 2 No. 11, p. 9 (Aug 24, 1977) 


SIMPLD 


apor 


TATA 


LINE 
INPUT 


STORE 


A program for TIM (JOLT DEMON), Hex tape and documentation $4.00 





No. 11, p. 3 


(Aug 24, 1977) 


4.00 for annotated source and object code of patches for TIM 


1 


ll, p. 8 
$0.13 stamp 





“Large Type Summary 


(Aug 24, 2977) 
plus SASE. 


"6502 Legible Tape 


cont. on 


Markus P,Goenner, Buel, 3205 Mauss,Switzerland 





POINTH 
CRLF 
GLITCH 

e°CR 

LINL 

#°ESC 
STORE 

os 

OLTCH 

CrLr 

CLLAR 

PACK 

Wwret 
GETCH 

PACK 

fend 

TUL 
(POINTLILY 
INCPT 


INPUT 


PROGRAM-START: (oac 

PROGRAM DESCNIPT LON: 

AFTER YOU HIT Thk “G"-KEY OM THE TTY.THE PROGRAt 
ANSWERS WITH A 
ENTER MOU THE A ERL YOU WICK TO LOAD DATA. 
LEADING ZERO'S LED NOT TO DE ENTERED FOR THL 
ACERESS FIELD.Of A “Ch” FROM YOU,THE TT’ PROCLLD 
A “CR-LF" AND YoU AML RLADY FOR ENTLRING LATA IN 
NEXA CODE-.JUST TL BYTL AFTLA THE OTHER-AT TIAL Lup 
OF A LINE, TYPE "CR"eTO JUMP BACK IN THE NONITOR, 
TYPE AN “ESC THE TERMINAL WILL PRINT 4 DOLLAR 
SIGN BEFORE A .-LF™ AND THEN YOU ARE BACK If) TIE 
KIM-MONITOR+ 
BY THE WAY, THE 


















PROGRAM IS TULLY RELOCATABLE. 

e0ne 08 G 

e788 

DBAIBBESFBPSFOF CTF IFOASAL EC OODFO@S2BACIFFOFAASFELS 
FAASF 9BSFR2O2F It OGSAIEC 9BDFOF EC IIBDOSEAIZ4COABILEO 
2FIEAC6SIC2BACI FLOESDOSAIESOAC LFAGICASFEDIFATOCIIF 
1890038 


[3 


oq2l 


Add thia to tf 
tf you didn't _ 
FIRST BOOK OF KIM... 


zal Time Clock program faom issue #4, 
then you'll find the RTC in THE 
«sthe editor 


Charles H. Parsons 
80 Lonrview Rd, 
Monroe Conn 06468 








This is the temperature control I mentioned. 
That's about it for now, All this could be expanded 
or consolidated if desired, 

I thourht you might be interested in one thing 
which cave me a lot of trouble. When comparing 
the current temperature with the table I first 
tried to use RMI. This worked most of the time and 
then at a certain point it fell through. The 
trouble was that this is meant to be used with : 
Signed arithmetic and does not work if the subtraction 
results in a mumber that looks like a signed 
negative number, Switching to BCC cleared this up. 

Its easy enough to say " Look at the manual" but 
if you think you are doing the right thing this 
does not oocur to you immediatly. I don't know 

if others have fallen into this trap but I thought 
it was worth mentioning. 


Read Temperature Once Per Minute 


Line’ Code label Instruction Comment. 
0100 A581 TKTEMP LDA SEC Do At 50TH Second 

0102 29PC AND PC 

0104 c950 CMP #850 

0106 = FO01 REQ DO 

0108 60 RTS 

0109 208001 DO JSR PREQ Read Frequency At PB1 
010C =A5B81 LDA SEC 

O10E = =29FC AND PC Capture Por 4 Seconds 
0110 C950 CMP #850 

0112 POPS BEQ DO 

0114 = FB SED Work In Decimal 
011538 SEC 

0116 8 AS5P9 LDA INH Get LSB's Of Prequency 
0118 8596 STA CFREQL Put In Current Frequency 
O11A = E594 SBC LCAL Subtract Calibration 
O11c = 8589 STA CTEMPL Put In Current Temperature 
O11E ASFA LDA POINTL Repeat Por MSB'S 

0120 8597 STA CPREQH 

0122 E595 SiC HCAL 

0124 858A STA CTEMPH 

0126 «= ROOF BCS POS Exit If Result Is Positive 
0128 = =Ag900 LOA #$00 Complement If Negative 
012A 38 SEC 

012B E589 SRC CTEMPL 

012D 4868589 STA CTEMPL 

012P) = =A900 LDA #$00 

0131 E58A SBC CTEMPH 

0133» =09C0 ORA #$CO And Put CX In CTEMPH 
0135 858A STA CTEMPH 

0137 «8 POS CLD Go Back To HEX 

0138 = 60 RTS Exit 


Additional Zero Page Locations 


0089 CTEMPL LSR'S Of Current Temperature 
008A CTEMPH MSB'S Of Current Temperature 
0094 LCAL LSS'S Of Calibration Constant 
0095 HCAL MSB'S Of Calibration Constant 
0096 CPREQL LSB'S Of Current Frequency 
0097 CPREQH MSR'S Of Current Frequency 


This is a subroutine which when added to the clock display 
routine will read the input port PB1 exery minute at the 50TH 
second and subtract the calibration constant in zero page locations 
The calibration constant is the frequency at zero degree's, 
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ppyusT VALVE OF Re Re XR NOK FoR pote be 
Fer. D£/% AT KIM Re A ISK FOR Ie Yen 
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se PepaTure To FREQUENCY ConrvERTER 





FERABLY 
KIM-| [ aa ce eee Ft 0, $A DD 
PR ‘ 
= K.+10C C= TEMP ING 
f a Ke fave 









LEVEL 
SHIFT 


KIM IWTERFACE 


ew. PeRSowsS 3-20-77 


Twentyfour Hour Conversion 


Comment 
Do On The Hour 


Line Code label Instruction 
1780 A582 HRA LDA MIN 


1782 DOI? QNE OUTN 

1784 ABI LDY HR If Hour Is 12 
1786 C012 CMP #312 Set To Zero 
1788 DOO2 = BNE N 

178A A000 LpY #§00 
.178C A584 N LDA DAY If Afternoon 
178E 2901 AND #801 Add 12 

1790 F006 PEQ OK 

1792 FB SED 

1793 18 CLC 

1794 98 TYA 

1795 6912 ADC #812 

1797 AB TAY Put In 24 Hour 
4338 8498 OK STY ALTHR Counter 

179A DB CLD 

179B 60 OUTN RTS 


Additional Zero Page Locations 


0098 ALTHR 24 Hour Counter 

Thia is a subroutine which generates a 24 
hour clock. This 1s more convenient for control 
applications, Thia prorran could be incorporated 
in the clock interrupt routine if it were 
rewritten. 


Display Current Temperature While 2 On KIM Is Pressed 


Line Code label Instruction Comment 
0140 206A1P DSTEMP JSR CETKEY Do When 2 Is Pressed 
0143 c902 CMP #3902 

0145 po2D RNE RTS 

0147 AQ? LOA #37F Set Output Ports 
0149 6D4117 STA FADD 

o1ke A20D LDA #30D Initial Dirit Number 
Oi4E A002 LDY #302 Output Two Rytes 
0150 A589 LDA CTEMPL Output Absolute Value Of 
0152 «= 85P9 STA INH Temperature 

0154 . ASBA LDA CTEMPH 

0156 «86293F AND #33F Mask Sign 

0158 65FA STA POINTL 

015A 20281P JSR SCAND) Display Temperature 
015D A58A LDA CTEMPH 

O15r = 29C0 AND #3CO Minus? 

0161 FOOA REQ PLUS 

0163 + AO7F LDY #37F If So Superimpose Minus Sign 
0165 «=—8C4117 STY FADD Set Input Ports 
0168 = A20B LDX #30R 

016A 204E1P JSR CONVD +6 

016d A900 PLUS LOA #300 Set Input Ports 
Oi6F 8D4117 STA PADD 

0172 ~«=POCC BEQ DSTEMP Do Again 

0174 60 RTS) RTS 


This is a subroutine which when added to the clock display 
routine will display the current temperature on the KIM-1 display 
while 2 on the KIM-1 keyboard 18 depressed. 





Line 


0098 
009C 
009D 
O09E 
OO9F 
O0A0 
O0A1 


Temperature Control 


Code Label Instruction Comment 
A581 CNTRLT LDA SEC Do On The Minute 
D033 PNE OUTZ 
A000 Loy #$00 Get Temperature 
AGIA LDX TEMP 
A SBA LDA CTEMPH 
29¢0 AND #$CO If Minus Set To 
F002 NEQ ARND Zero 
se io: Ea 
ARND LDA ALTHR Select Day Or Night 
C59P CMP DAYST Table Of Set Points 
9004 RCC NITE 
C5A0 CMP DAYEND 
9002 RCC BGN 
AQOA NITE LDY #80A 
BA RGN TXA 
A200 LDX #$00 
DI9B ~=oLP CMP (TAB1),Y 
DOOR RCC OUTP If Tempernture Preceeds 
c8 ny Set Point,Output 
£8 INX Proper Control Code 
EOOA CrX #ZOA If Not Keep Looking 
DOF6 BNE LP Through Table To 
AQPP OUTP LDA #3PP To The End 
600117 STA PADD 
8A TXA 
Ag TAY 
B19D LDA (TAB2),Y 
8D0017 STA PAD PA-O Thru PA~-7 Are 
85A1 STA COUT Output Porte , 7 
60 ouTz RTS 
Tables 
TARI Temperature Set 
Points TD1-TDA 
Temperature Set 
Points TN1-TNA 
TAB2 Control Codes 


Temperature Control (continued) 


Additional Zero Page Locations 


Code 


Iabel Instruction 


DAYST 
DAYEND 
couT 


Comment 


Temperature Table 
Pointers 

Control ‘able 
Pointers 

Start Of Day Table 
End Of Day Table 
Current Control Code 


This is a subroutine which puts 4 word at an 
output port which is determined by set points in 
a table. Refer to the work sheet for details. 
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Work Sheet For Temperature Control 


Alarm Heat Vent Code 


Fan 
on off onoff on off on off 
Output Fort PA7 PA6 PAS PA& PA} PA2 PA1 PAO 


Temperature 
Range Foundary 
Day Nite 
<TDI<TRI 
Too Cid 1 
TDI TNL 
Hyst. 
TD2 TW2. 
Cold 
TD} TN3 
Hyst. 
TDS TNY 
Normal 
TD5 TNS 
Hyst. 
TD6 TN6 
Warm 
TD? TN7 
Hyst. 
TDS TNS 
Warmer 
TD9 TN9 
Hyet. 
TDA TNA 
Too Hot 
‘TDA YTNA 
This is'an example of a simple temperature control 
using four devices hooked to an eight bit output port, 
TD1-TDA & TN1-TNA represent the maximum temperatures 
in each temperature range. They are located in a table. 

The lines labeled Hyst. are interposed between 
lines where action is taken to provide hysteresis between 
the on and off points of a device. Tney may not be 
necessary in a slow system but might be desirable in 
e fast system with tight control, 

The code shown represents the proper word to place 
at the output port for proper control in any temperature 
range. 

i Each pair of outputs would be connected to a 
flip-flop for control of the respective devices, 


Pack Temperature into 1 Byte Of Hybrid Code 


~ 
~ 


AS 
25 
65 
45 
55 
51 
59 
58 
SA 
1A 
9A 


FY N 
coooo eo 
— ee © Oo 

ooo°e 
oooo co 8 
~ 

oooeoo eo 8 Oo 


1 


~ 
re ow ON AH 
coo oO OOOO 


“2000 
oot mm 

ee 
oooo Oo oO 

coco OOO eH 


1 


= 


Line Code Label Instruction Comment 
179C A581 PKTEMP LDA SEC Do On The Minute 
179E D020 BNE OUTP 
17A0 A589 LDA CTEMPL Divide By Ten 
17A2 4A Lsa 
17A3 4A Ls 
1704 ba LSR 
17A5 4A LSR 
{ ‘AG 859A STA TEMP 

AB AS LDA CTEMPH Use FF for overflow 
17AA C916 CMP #616 At 160 Degrees 
17AQ 900% BCC #$o4 
17AE AQPP LOA #8FF 
17B0 B59A STA TEMP 
1782 18 cLe Multiply CTEMPH 
17B3 OA ASL By Ten 
17B4 OA ASL 
17B5 0A ASL 


1787 9003 RCC SKIP Test Por Over 100 
17P9 18 cLo If So Convert MSR'S 
17PA 69A0 ADC #$A0 To Hexadecim) 

17PC O59A SKIP  ORA TEMP And Combine $ Bytes 
173E 859A STA TEMP 

17C0 60 OUTF RTS 


Additional Zero Page Locations 


009A TEMP Compressed Temperature 


Although the temperature given by CTEMP is 
completely reneral it requires two bytes to describe, 
In order to reduce this to one byte and still provide 
@ quasi-understandable code a hybrid notation was 
chosen. This code is limited to 0-159 degrees. The 
four LSR'S are retained in deciml notation and the 
four MSB*S are converted to hexadeciml, 

ex. D6=136 degrees 
Relow 100 the temperatures can be read as decimal, 


Frequency Counter Subroutine 


Line Code Iabel Instruction Comment 

0180 A901 FREQ LDA #301 Set 1/0 Forts 

0162 8D0317 STA PRDD 

0185 A581 LMA SEC Do For 4& Seconds 
0187 AB TAY 

0188 2903 AND #803 

O18A FO38 REQ RACK 

018C 98 TYA 

018D 2902 AND #$02 Display Por Seconds 
018F DOI0 RNR DSPL 3a 

0191 A900 Loa #$00 Zero Frequency Counter 
0193 85F9 STA INH And Count For Second 2 
0195 B5FA STA POINTL 

0197 A5FR STA POINTH 

0199 FB SED 

019A ADO217 L LDA PRD Stall For One Pulse 
019D 2902 AND #$02 

019F DOF9 BNE L 

01A1 ADO217 H LDA PBD 

O1A4 2902 AND #$02 

O1A6 FOF9 REQ H 

O1A8 18 CLC Count One Pulse 
O1A9 A901 IDA #801 

O1AR GSF9 ADC INH 

O1AD 85F9 STA INH 

O1AP A900 LDA #300 

O1R1 65FA ADC POINTL 

0183 85FA STA PIONTL 

0185 A900 LDA #$00 

0187 65FR ADC PIONTH 

01nd 85FR STA POINTH 

O1BB A581 LDA SEC Still Second 2? 
O1RD 2901 AND #$01 

O1BF DOD9 BNE If So Keep Counting 


L 
O1C1 201F1F DSPL JSR SCANDS Display Cowmt 
01ck 60 RACK RTS 


01C5 200003 RFREQ JSR KIM Start Here To Update 
01C8 208001 JSR FREQ Every 4 Seconds 
01cR 18 cLe 

01CC 90F7 RCC RFREQ Loop 


This is a subroutine which can be run by itself 
by entering at 01C5 or under prosram control with 
JSR PREQ. The output is the frequency at PB1 in Hertz. 


bn Biivel Wew 








¥ 4. 72 IPRS ETSE By FeSIOF ‘ S5c8 09 vests ree 0? cantenves veut 10 
A KIM BINARY PUMP ¥ LOAD KOvTIME  Stiitenson tall : covy oe Kato rey TuUFFER END AJOKESS 
FROM, Voiversity of Florida eoce oC tre few 8 JLUAD FLAG WORD 
Gainesville FL 32611 4 oocce 00 LAN Fou 2 
Well, I guess the time has come to stop enjoying the good stuff others have sent in earn oc Tic Fes 9 
and to start contributing myself. The enclosed program was written for SPICA (Small Soce ee. CG OE Ce. 5a 
Portable Interactive Computer for Astronomy) to allow dumping and loading blocks of data 0000 2 NPuc FCB 02 
(or code) under program control, I have put in lots of comments and it should be almost aH ss Time baie 
self explainatory. Tbe user defines a buffer area ond dumps or loads that area at a rate 8o03 ve Seed 
of abowt 1000 bytes in 12 seconds. If an incoming file exceeds the buffer length reading a10 UR 6010) SUPERDJMP START>s AT 80100 
stops when the buffer is filled and an error flag is set. If the incoming file ID does Bree ee eee: ee een eae f -AC SEAT AQP. COO In YES, 
not match the requested 1D the buffer is filled and an error flag is set. We have o relay o105 20 B2ts Sem SRIVeU SENDTEALEZE vee 
on one output Line connected to the REMOTE jack on the recorder to atart and stop the 010 ay 27 LIA aber 
C10 es cc STA GANG #$0D UUTPUT B3KU 


tape. (Soon we bope to use a PHIDEC recorder for better control.) I use as much of the 





ay oF LOA esuF FUPEN CHANNELS 
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Ss 
8 
a 
KTM ROM as possible but I wish they had used more subroutines in there, its not as mice Oe ee aol este Sta 2b0D 
as it could have been. With these subroutines a $29 cassette recorder can becowe a usefal 3 1 a es LuA #820 3SENY 32 SYNC CHARACTERS 
3 85 CD STA c PSAVE CHAR COUNT 
digital data recorder at resonably bigh data rates (100 bytes per second + housekeeping). ortat as ne SUA TIC AVE (CHAR. COU 
Other Misc. Comments: 8) We have used SUPERTAPE and SUPERDUMP/LOAD on @ Radio Shack CTR-29 or 46 ira) PHA AVE CHARACTER 
and a Radio Sback Minisette-V (very nice because of the CUE feature) with few problems. H 5 zo 9901 2o8 JuTcnt eins ione “EMauAt 
With the Minisette-V we need to unplug the earphone when recording to get suceas- [ bave ole ce cD ore TIC PREOUCE COUNTER - 
not good reason wby 777? But othertmight watch out Olle OOF? NE HECE INISreO? 
b) A simple RS-232 interface plus power-on cesct is shown below...cheap too (sort of). O120 AD 2A LA BLA eSEND teF 
nie ety evr aie ria) , ‘ | ol22 20 9991 JSR JUTCHT 
ste 43 isa Be, 
é 1 Jak ule 
As232z OlZA 38 Ste SCUMPUTE # OF UYIES sees 
O1ce AD FTLT. Lua EAL Tu bt SENT . 
ovr 4 te tO Fol? Fred Sau AVE NHL og . 
a8 nA no aL 
acitag RIEL WE Th aetns Ose AD FeL7 VA CAH . ae . 
mcsey CTS idee Ol3> Cb FOIT SBC SAH 
c) Many contributions to KUN show 1/0 interfacing ide everyone should become familiar 0138 20 eo! Jsk UUIBT ;0UTPUT Net 
with the Motorola 68XX Line of support chips (get their good data book). A major virtue it ae area Usa: Outer fccsecurpure 
ef the 6502 is that it 1s compatible with all tbat good Motorola etuff....ignore M's Ol AD FOIT ia to aye 
instructions to gete the addressing with VMK since ajdress is always valid with the 6502. O142 20 otOoL Jsk guTeT oO a 
I bave used the 6820 (PIA: 16 1/0 lines plus 4 handshaking control Lines) and the 6850 See oe eee SNE ee. pareiee UYEE “USING VEU ¢ se 
(ACLA: good for toterface to # terminal or # large computer terminal port. They are Olay 20 EAI 388 INCVEG TINCREMENT FOR NEXT BYTE 
coming out with floppy disk and tape recorder support chipa soon.....1 couldn't wait and Cl4— AD EDIT LUA vweBel ARE WE AT ween | 
am using @ NEC floppy controlier weant for an 8080 (ugh) but wiah I had waited. a a eS eee. teken e+ END ADDRESS? 
d) My 9 year old Jennifer Anne Oliver, loves WUMFUS and thanks you for publishing it..She 157 &O Fel? Sbc LAH 
rune KIM Like « pro, they sure learn young. O1SA 99 ED BCC SUPUPT ENUT FINISHED +GET MURE 
AD 2F LOA e82F  SSEND t7¢ 
$, Sores @e SUPERIUNPSSUPERLUAU 34 JOHN Pe OLIVER esereces ° é 20 9001 JoR VUTCHT 
” DLPAKIMENT UF PHYSI.S ANI ASTRONIMY Otel av E717 LOA CHAL 
UNEVERSETY UF FLURIUA +GALNESWILLE FL O164 20 O01 Joe uUTbor #SEND CHECKSUM 
Olo7 AD EBI7 LA CHKH 
THIS PRUGRAM ALLOWS THE USE OF Tht KEM<1 CASSET TAPE ° a 20 £01 JSK outer 
INTERFACE TO HEAD ANO BRITE DATA ot OCKS UNJIER PRUGRAM CONTROL « Ole ©0 RIS 
IT TS DERIVED FROM JIM BUTTEHFIEL2*S SUPERTAPE RUUTINES IN Olek 48 UUIbT PHA JMEX GUTPUT ROUTINES SAVE BYTE 
ALM USERS NOTES #2 WT EACH DATA arte IS wALTTEN AS AN 6-31T O1%F aa LUSK 
CHARACTER RATHER THAN AS THO ASCIL CUVEO HEX CHARACTERS. THUS Gi70 4a SK 
1a BYTES ARE OUMPED UR LOADED IN -ESS THAN 12 SECONUS. THE O17t 4a use 
TAPE FURMAT HAS BEEN SOME BHAT CHANGED IN THAT THE NUMEBER OL72 4A ree) 
OF BYTES IN THE RECORD ARE BALTTEY IN PLACE UF SAL/H. KIM ROM ci73 20 e108 SOR HEXTA 3UET © MSH AS ASSES 
HOUTINES AHE USED AS FAR AS PUSSIZLE WHILE KEEPING FULL O176 20 9001 JSR GuTtat ieRite Tt 
* SUBROUTINE STATUS FOR TH: SE PRUGRAMS« O179 68 bla RESTORE OVTE 
O17A 20 BIOL JSR HEKTA {GET ® LSU AS ASLIE 
T2 wASTE A FALE: PUT STARTING ADDRESS IN SITFS76 o17y 20 9001 JSR JUTCHT jeRite IT 
PUD ENUING ADDR: SS ¢ LOIN SITE7/9 FBO ats 
PUT FILE IG IN B17F9 Otel 29 OF HLXTA = AND @S0F = GMASK OFF 4 LSB 
0183 C9 0A CMP 880A 
THEN JSR SUPERO. THIS HOUTINE CAN UE INTERRUPTED AS LONG o1e5 18 cu 
AS THE INTERRUPT ROUTINES 00 NUT TOTAL MORE THAN 100 0166 30 02 BME 4EXTAL 
MICRUSECONDS IN EACH 200 MICROSECINDS. Giese 69 97 AUC #807) GA TD F 
: 018A 69 30 ALXTAL ADC #830 i0 TU 9 
TO READ A FILE: PUT INPUT BUFFE2 AOORESS IN SI7F576 Oluc 60 RTS : 
PuT CNO OF BUFFZR #¢ 1 IN SITFTZE o16D 20 4Ciy GLWTCHC JoR Cree CHECASUM CALCULATION 
PUT DESIRED FIL: 10 IN SI7F9 (USE 800 TO GET 0190 AO 08 CUIC4S LoY «808 SET FOR BOITS 
NEXT FILE. REGAGOLESS OF ITS 12 ON TADE) 0192 Ba CE ST¥ COUNT SAVEUIT COUNT 
0194 AO o2 THY Lor 9802 tT POR 3PHASES 
THEN JSK SUPERL. THE PRUGRAT WIL. RETURN WITH THE OATA IN 0190 Ba CF sty TRIB SAVEPHASL COUNT 
T4E BUFFER AREAGTHE RECEIVED 12 IN SI7F9. AND A FLAG (800CB): 0198 be 00 “un LOX NPULeY je UF 172 CYCLES 
= 00 LUAD OK 019A 48 Baa SAVE CHAKACTER 
= FF OR = 7 BUFFER OVERRUN 0190 78 “unt Sel DISAGLE INTERRU?TS 
= Fe OR = 7E CHECKSIM ERRUR C19C 20 ATT cUne LIT CLKRDE GTIMER DONET 
C19F 10 FB BPL ZON2 = NU. WAIT 
A FELE dD ERRUR YIELDS 60+ TF+ OR TEs OLAL 89 0100 LOA TIMGeY 3UET WALT TIME Iv MICRO. 
o s BD 4417 STA CLKIT «SECONDS FUR TIMER 
THe LOAD RJUTINE IS RELOZATASLE + FO RELOCATE THE DUMP HOUTINE O1A7 AS CC Coa B Gutpurelt « 
MULIFY TRE JSK'S TU GUTCHTs OJTCH@, JITET. AND HEXTAs O1A9 49 BO €UR + BETWEEN OAS 
p7ra O1AKB 80 4217 STA UT PUTBLT 
ANY Tat RECORDER CONTROL ROUTINES BE CALLED BEFORE SUPERL OlAL 58 cur NADLE INTERAUPTS 
UK SUPEKL. CLAF 85 CO STA AVE DUTPUTBLT 
° 1 cA Ota ALL CYCLES SENT? 
N2Tc: SUPERL SILL NOT RETURN TO T4E CALLING ROUTINE IF THE TAPE 0182 v0 EF BNE D-SEND MORE 
1S NUT HEADING PROPERLV. | Clue 68 PLA GRESTORE CHARACT:R 





































Libs Co CF ust TRIB UNE LESSPHASE Ts GU 

Cle? FO Cy BLU site jAuo THIS 1SPRAS: 3 

Clby 30 57 ual KUT BALLPHASES DUNE 

Club 4A LK EVUIT sees 

CheC YO vA BOL LUN IF LT US #28 sees 
CibE AD ¢ otle Luv #3co eee CHANGE TO «400 HZ 
C1co FO ue bEU UN URCED BRANCH 

Cice Co ct houT LEC CUUNT GuNE LESoUIT TO 40 

cica oc ce BNE TRY 

Cice 60 KIS ¢ALL LONE 

206 QH#L UPERLGAD STARTs AT £0209 
C200 AV F9OIT SuPEXL LDA TURE eo ee 

C2u3 85 ca STA e+eENTENDEO 1D 

Ge0s AD FTLT LUA TURE DUFFER EN) ADDRESS 
C208 #5 Co STA 

e2cA AD FAIT tua 

C20v 85 CA > sta 

O20F av CO CUA 

Oetl 8d CB STA 

0213 Bv FOIT STA 

O2t6 Aad 60 LOA 

e218 80 ECI7T STA DT 

C218 26 BCle JOR HM PATCH ADDRESS ONSTACK. uu T) COADT 
CZ1— BO FOLT KATLH STA GeT HERE FROW $199CeeedKP vio 
O221 CS CB cup NTENUED 10 7 

€223 FO OA bea es 

0225 a9 00 Loa NY 1D sees 

G2e7 C5 cB CHP eee UK 

0229 FO 04 bee € 

02a ad 80 LUA ET ERHUR FLAG sone 

O2z2b a5 CB STA eeee AND CONT AVUE 

O22 Ag 8D PATCAH2 LOA STA* UPLOVE 

€231 ev ECI? STA ECREATE VoB STORE INST 
e234 18 cue LEAR CARRY FUR ENDING ADD COMP 
D235 AO ELIT LvA veue2 tt @ UF BYTES . 
0238 7D FSIT AUG SAL AOD SAL 

0238 BO FTIT STA EAL TU GET & 

O23— Av EDIT LUA veuer UF BYTES 4 wees 
C2at 70 FOIT AUC SA ADD SAH sees 

0284 eu Fel? STA EAM TO GET EAH 

O247 20 3219 Dok 2 OCHKSUMe SEE UP VER 
Q244 20 241A PATC4I JSR NEXT BYTE (ACC HAS TAIT ASCII) sees 
¢240 Av EAIT oa SO GET Tht FUL BEIT uYTE 
p250 20 4ci9 JOR WO TO CHECK Sud 

©253 20 ECLT JSR Tome 1 

6256 20 EALD JSR NCREMLNT VEd AJORESS FUR STURE 
€259 AU EDIT vA veuel 4D ADDHE SS? 

o25c CS CO CMP EALU DUP FER END ? 

O25E * vO O02 BNE PATCH 

0260 FO CS bEQ PATCHES jMAYDE 7 

O202 CO FTIT PATCAHS CMP ZAC sRECORD ENO? 

C205 00 ES BNE PATCH GNO. GET MORE BYTES 

C207 AD ELIT PATC44 LUA VvEUse 

020A C5 CA cur i GBUFFLR ENO ? 

O2o0C vO OF DAL TCHS 3NO 

O26— CO FIT CaP LAN FALSU RECORD END 7 

e271 00 26 BNE LERKUK2 §NUs LRKUR EXIT 

0273 ao EvIT LOA VEU+L jLUe ORDER BYTE ALSO IK? 
O276 CD ETIT CMP EAL 

6279 00 29 BNE ERROR2 $NUs ERROR EXIT 

o2z78 £0 05 BLU PATCHO 

0270 CO FBIT PATCH5 CNP LAH ELUKD END ? 

0280 00 cB bNe PATCHL Us CONT ENUE 

C262 20 241A PATIC41® ISK 4OCHT cT_ENUVING CHARACTER 
o2es5 C9 2F CHP werk vee 

0287 00 19 BNE LARRUR 

O29 20 F319 ‘ Jok avUYT ZUET CHECKSUM LU 

C2ec CO ETI? CHP CHK FCNECKSUM OK? 

O2eF 00 ¢8 BNE ERKUW 

O291 20 FIIG JOR HUGYT suet CHECKSUM HE 

c294 Cv EMIT CMP crm GG 

0297 FO Ca Bea EXIT 

o299 ce ca ERRUZ DEC LELG GFE UR TE = CHECKSUM 

C298 co CB ERRURZ LEC yRE UK 7F = OVERGUN 





LFLu 
$ Ble TE Um TF EMVICATCS LU ERROR 
ats RETURN 





KIMSI_COMMENTS 


From the response I've received concerning the KIM to S-100 bus 
adapter being offered by FORETHOUGHT PRODUCTS, I'd say there are a number 
of satiagied users. Nothing but words of praise for the product, 40 far. 
With S-100 memory running as Low as $125 for 8K kits (BASE 2), the acheme 
seems Like a reasonable method for system expansion, As far as assembled 
$-100 boards are conceaned, the only ones that I familiar with are the 
KENT-MOORE products. They market video and memory boards which acem to 
work as well as they Look. more 





By the way, I've been informed that FORETHOUGH PRODUCTS have ....ared 
up any problemas with their telephone service and are now accepting VISA 


(BankAmericand). Their phone number is (503) 485-8575. They indicat 
o64-the-shelg delivery. erry oe 
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BASE 2 INC, PO Box 9941, Warina del Ray, Ca 90291 (213) 822-4499 


KENT-MOORE INSTRUMENT CO., PO Box 507, Industrial Ave, Pioneer, Oh 43554 
(419) 737-2352 


FORETHOUGHT PRODUCTS, PO Box 386, Coburg, Or., 97401 





RANDOM ACCESS CORNER 
Here's a new feature of the NOTES f0r those who have special needs... 


PEN PAL NEEDED - P. A. Ras, H. Gorterhog 138, DELFT, NETHERLANDS 
Mr, Ras also meeds info on Friden Flexowniten/KIM interfacing, 


BURROUGHS TERMINAL/KIM-1 INTERFACE ingc needed by Gene Moore, 817 Windsor Rd 
Cumberland, Md.21502 





BRINGING UP 8K CSI BASIC ON KIME ox tauing to bring &t upf...get in touch with 
Donald Wilt, 60 Evans Ave., East Hartford, Ct. 06118 


FORTRAN IT FOR THC £72---"We'ae thinking about offering it depending on 
Taterest. Send SASE and info on what software you: nced 
to GTNESEL MICROCOMPUTERS, 29 Genesee St., Piffand NY 14533" 


GERMAN USER GROUP CETTING STARTED in the Frankfurt area, For mone info, 
COHAAC ALE Cheiber, Berliner St. 10, 6236 Eschborn, 
West Germany. 






KIM-3 and/or KIN-4 desperately needed!!! contact JOHNSON COMPUTER 
(216) 725-4560 


WASHINGTON AREA KIM ENTHUSIASTS who are interested in starting a KIM KLUB, 
Send a Sik + on callitl WAKE c/o Ted Beach, 5112 
WilPcamaburg Blud, Arlington, Va 22207 1703) 538-2303 

MICRO-SOFTWARE SPECIALISTS INC., 1911 Meadow Lanc, Arlington, Tx 76010 
have announced that they have cleared up the problems 
with their assembler mentioned in our newsletter, They 
axe accepting VISA at (817) 274-0291 


WANTED: KIM-2 or KIH-3 RAM board for memory expansion. Contact Kenneth W. 
Ensele, 1337 Foster Rd., Napa Ca 94558 (707) 226-5014 


FOR SALE: KIM-! and expermintation accessories used in TERC microprocessor 
workshops. Vatued at $500.00, will sell for $300.00. 
W. L, Sadler, 2020 Easy Street, Waukesha, Wi., 53186 
(414) 547-9391 





BOOK REVIEW SECTION {rom Charles A. Hills, 677 Lippincott Ave., 
Moorestown, N.J. 08057 


a PROGRAMMING BOOK ®**® HOW TO PROGRAM MICROCOMPUTERS by William 
Barden 5 explains Looping, stacks, List processing, bit manipu- 
lation, etc. The unique feature is that all program explanations are for 
the 8080, 6800, and 6502 40 one can see how each £4 programmed to do the 
same thing. Twenty utility programs in each system ane provided for comp- 
arison of coding requirements. 


{Ive seen this book and can also reccommend it.....ERIC) 


continved Grom py. IS 

Siepson, Richard $., "A Date with KIM" 

Byte 1, No. 9, pp. B-12 (tay 1976) 
Description of the features of KIM-1. 


Microcorputer Associates, 111 Main St., Los Altos, CA 94022 
"Jolt Microcomputer” ~ 
Radio-Electronics 47, No. 6, p. 66 (June 1976) 


Includes description of JOLT, based on 6502, and gives demonstration 


Program using DEMON Monitor, 


Travis, T. E., IM-1 Microcomputer Module" 

Microtrek, pp. 7-16 (August 1976) 
Notes and programs for KIM-1 including Drunk test and several 
useful routines. 





Anon., "MOS Technology - KIM MCS 6502" 
Interface Age 1, No. 9, pp. 12, 14 (August 1976) 
Ao announcement of the KIM-1. 


Rankin, Roy and Wozniak, Steve, "Floating Point Routines for the 6502" 
Dr Dobba Journal 1, No. 7, pp. 17-19 (August 1976) 
Calculations from 10-38 to 10+38 with 7 significant digits; 


Bradshaw, Jack, "Monitor for the 6502" 
Dr Dobbs Journal J, No. 7, pp. 20-21 (August 1976) 
Monitor a la OSI. 


Garete, Mark, "Lunar Lander for the 6502" 
Dr Dobbs Journal 1, No. 7, pp. 22-25 (August 1976) 
A game requiring TIM Monitor and a terminal. 


Gupta, Yogesh M., "True Confessions: How I Relate to KIM" 

Byte 1, No. 12, pp. 44-48 (August 1976) 
A serics of notes on KIN-1, Includes Clock Stretch and Random 
Access Memories, Bus Expansion and modification of drive capability 
using tristate drivers, Interrupt Prioritizing Logic and Halt 
Instruction. 


Thompson, Geo. L., “KIM on, Now" 
Byte 1, No. 13, pp. 93-94 (September 1976) 
Notes on using KIM-1. 


Worniak, Steve, "Mastermind: A Number Game for the 6502" 
DDJ 1, Ho. 8, pp. 26-27 (September 1976) 
A number game adaptable to KIM-1 with terminal. 


Baum, Allen and Worntak, Stephen, "A 6502 Dissenbler" 
Interface Age 1, No. 10, pp. 14-23 (September 1976) 


Kjeldsen, Tony, "Next of KIM" (letter) 
Byte 1, No. 14, p. 136 (October 1976) 


Pittman, Tom, "Tiny Basic for 6502" , 

DDJ 1, No. 9, pp. 22-23 (October 1976) 
Available fron Itty Bitty Computers. TB650K (0200-OAFF) 
is for KIM and most homebrew 6502 systems with RAM in 
first 4K of wemory. 

Anon., "Build a Simple A to D” 

Interface Age 1, No. 12, pp. 12-14 (November 1976) 
Simple circuit, 6502 software, 16 locations. Use to 
interface a pot or a joystick. 


Pollock, Jazes ¥., "1000 WP!l Morse Code Typer” 


73 Mag. No. 196, pp. 100-103 (January 1977) 
Use of Kili-l for sending code at 9-1000 WPM from @ keyboard. 


Robbins, Carl ti., "The Microprocessor and Repeater Control” 
QST 61, No. 1, pp. 30-34 (January 1977) 
KIM-1 control of repeater functions. 


EDN 22, No. 6 (March 20, 1977) 

See also 22, No. 8, pp. 104-111 (April 20, 1977) 

+ No. 4, pp. 89-92 (february 20, 1977) 

» No. 10, pp. 84-90 (May 20, 1977) 

22, No. 12, pp. 79-84 (June 20, 1977) 

Use of KIM-1 in a music program is detailed in April 1977 issue. 








Salter, Richard J. and Burham, Ralph W., “Navigation with Mini-0" 
Byte 2, No. 4, pp. 100-109 (April 1977); See also Byte 2, Ko. 2, p. 62 
(February 1977) and Byte 2, No. 3, p. 70 (March 1977). * 
Several articles in a series on the Omega Navigation System and 
the Mini-0 Receiver driven by a KIM-1 processor. Developed at 
the Ohio University Avionics Engineering Center. 





Haas, Bob, "KIM-1 Memory Expansion" 
Kilobaud, No. 4, pp. 74-76 (April 1977) 
Adding the S.D. Sales 4K low Power RAM board to KIM-1. 


Gordon, H. T., “Stringout Mods" 
DDJ 2, No. 2, p. 8 (February 1977) 
“A 6502 program applicable to KIM-1 to relocate blocks of 
instructions in RAMs. 


Sherman, Ralph, "A 650X Program Relocater" 
DDJ 2, No. 4, pp. 30-31 (April 1977) 


Ockers, Stan, "IV Sketch Program” 

DDJ 2, No. 4, pp. 32-33 (April 1977) 
“A program for use with KIM-1 equipped with a Southwest Tech 
Prod Co. Graphics Board GT 6144. 


Simpson, Rick, “Come Fly with KLM" 

Byte 2, No. 6, pp. 76-80 (June 1977) ; 
Load 12K of memory in two minutes with a "Ply Reader" for 
Paper tape. 

Lancaster, Don, "A TVT for your KIM" 

Kilobaud, No. 6, pp. 50-63 (June 1977) 
TVT-6L {6 a low cost method of providing a TV conitor for 
KIM-1. Uses minimum new hardware but depends on a software 
program in KIM-1 memory for handling characters. Uses a 
low cost TV (Pansonic T-126A) for monitor. 


Lancaster, Don, “Build the TVT-6" 

Popular Electronics 12, No. 1, pp. 47-52 
A low cost direct video display based on KIM-1 software and « 
minimm of added hardvare. Slightly different than the TVT-6L. 


Pickles and Trout, P.O. Box 2270, Goleta, CA 93018 "TV Mod Kit" 
Detsiled instructions and kit ef parts for conversion cf a 
low cost ($80 approx.) Hitachi SX Chassis (Model P-04, P-08, 
PA-8, etc.) for a TV Monitor. 
Grater, Robert, "Giving KIM Some Fancy Jewels" 
Byte 2, No. 7, pp. 126-127 (July 1977) 
Adding a remote LED display for the K1M-1. 





Runyan, Grant, "The Great TV to CRT Monitor Conversion" 

Kilobauc, No. 7, pp. 30-31 (July 1977) . 
Although not specific to KIM-1, this article is useful in 
adapting a monitor to KIM. Uses inexpensive 12" Hitachi 
Model P-04, P-08, PA-4, PA-8. See also Sams Photofact 
Folder 1 Set 1601 or Folder 3 Set 1501. 


Fish, Larry, "Troubleshoot Your Software” 
Kilobaud, No. 8, pp. 112-113 (August 1977) 
A trace program for 6502. 


/ 


